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Prepared  in  cooperation  with  the 

SAN  JOAQUIN  VALLEY  DRAINAGE  PROGRAM 


This  report  was  prepared  by  the  U.S.  Geological  Survey  in  cooperation  with  the 
San  Joaquin  Valley  Drainage  Program  and  as  part  of  the  Regional  Aquifer-System 
Analysis   (RASA)    Program  of  the   U.S.    Geological   Survey. 

The  San  Joaquin  Valley  Drainage  Program  was  established  in  mid-1984  and  is  a 
cooperative  effort  of  the  U.S.  Bureau  of  Reclamation,  U.S.  Fish  and  Wildlife 
Service,  U.S.  Geological  Survey,  California  Department  of  Fish  and  Game,  and 
California  Department  of  Water  Resources.  The  purposes  of  the  program  are  to 
investigate  the  problems  associated  with  the  drainage  of  agricultural  lands  in 
the  San  Joaquin  Valley  and  to  develop  solutions  to  those  problems.  Consistent 
with  these  purposes,  program  objectives  address  the  following  key  concerns: 
(1)  public  health,  (2)  surface-  and  ground-water  resources,  (3)  agricultural 
productivity,   and    (4)    fish  and   wildlife  resources. 

Inquiries  concerning  the  San  Joaquin  Valley  Drainage  Program  may  be 
directed   to: 

San  Joaquin  Valley   Drainage   Program 

Federal-State   Interaqency  Study  Team 

2800   Cottage  Way,    Room   W-2143 

Sacramento,    California      95825-1898 

The  RASA  Program  of  the  U.S.  Geological  Survey  was  started  in  1978  following 
a  congressional  mandate  to  develop  quantitative  appraisals  of  the  major  ground- 
water systems  of  the  United  States.  The  RASA  Program  represents  a  systematic 
effort  to  study  a  number  of  the  Nation's  most  important  aquifer  systems,  which  in 
aggregate  underlie  much  of  the  country  and  which  represent  an  important  component 
of  the  Nation's  total  water  supply.  In  general,  the  boundaries  of  these  studies 
are  identified  by  the  hydrologic  extent  of  each  system,  and  accordingly  transcend 
the  political  subdivisions  to  which  investigations  were  often  arbitrarily  limited  in 
the  past.  The  broad  objectives  for  each  study  are  to  assemble  geologic,  hydrologic, 
and  geochemical  information,  to  analyze  and  develop  an  understanding  of  the 
system,  and  to  develop  predictive  capabilities  that  will  contribute  to  the  effective 
management  of  the  system.  The  Central  Valley  RASA  study,  which  focused  on  the 
hydrology  and  geochemistry  of  ground  water  in  the  Central  Valley  of  California, 
began  in  1979.  Phase  II  of  the  Central  Valley  RASA  began  in  1984  and  is  in 
progress.  The  focus  during  this  second  phase  is  on  more  detailed  study  of  the 
hydrology  and  geochemistry  of  ground  water  in  the  San  Joaquin  Valley,  which  is  the 
southern   half  of  the  Central   Valley. 
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ABSTRACT 


Information  from  5,860  wells  in  the 
central  part  of  the  western  San  Joaquin 
Valley,  California,  was  collected  from 
several  sources  and  compiled  into  a  com- 
mon data  base.  Only  2,547  wells  had 
sufficient  information  for  classifica- 
tion into  four  categories  based  on  the 
hydrogeology :  wells  perforated  in  the 
semiconfined  zone  at  depths  less  than  or 
equal  to  50  feet,  wells  perforated  in  the 
semiconfined  zone  at  depths  greater  than 
50  feet,  wells  perforated  in  the  semi- 
confined  and  confined  zones,  and  wells 
perforated  only  in  the  confined  zone. 
Additionally,  wells  perforated  in  the 
semiconfined  zone  at  depths  greater 
than  50  feet  were  classified  by  the  type 
of  deposits  in  which  they  were  perfo- 
rated (Coast  Range  alluvium  or  Sierran 
sand).  A  computerized  data  base  system 
was  developed  to  manage  well  information 
and  to  facilitate  characterizing  the 
nature  and  distribution  of  the  wells. 


Wells  perforated  in  the  semiconfined 
zone  at  depths  less  than  or  equal  to  50 
feet  are  evenly  distributed  over  part  of 
the  study  area  underlain  by  shallow 
ground  water.  These  wells  generally  are 
used  as  observation   wells. 

Most  wells  perforated  in  the  semi- 
confined  zone  at  depths  greater  than 
50  feet  are  perforated  in  the  Sierran 
sand.  This  concentration  of  wells  perfo- 
rated in  the  Sierran  sand  indicates  a 
tendency  for  using  the  Sierran  sand, 
where    it    exists,    as    a    source    of    water. 

There  are  533  wells  perforated  in 
both  the  semiconfined  and  confined  zones 
and  410  wells  perforated  only  in  the 
confined  zone.  Most  of  these  wells  are 
upslope  of  the  valley  trough  in  areas 
where  the  Sierran  sand  is  not  present. 
Wells  perforated  only  in  the  confined 
zone    are    concentrated    near    the    creeks. 
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INTRODUCTION 

The  San  Joaquin  Valley,  California,  is 
one  of  the  most  productive  agricultural 
areas  in  the  United  States.  However, 
agriculture  in  large  parts  of  the  valley 
may  be  adversely  affected  by  high  levels 
of  selenium  and  other  soluble  trace  ele- 
ments that  occur  in  soil,  ground  water, 
and  agricultural  drain  water.  The  occur- 
rence and  movement  of  soluble  chemical 
constituents  is  related  to  the  movement 
of  ground  water  in  which  they  are  dis- 
solved. Thus,  the  ground-water  flow 
system  must  be  understood  in  order  to 
manage  these  constituents. 

Many  wells  have  been  drilled  in  the 
San  Joaquin  Valley  to  supply  water  for 
agriculture  and  to  monitor  water  levels. 
The  large  data  base  available  for  these 
wells  (for  example,  water  levels,  depth, 
construction  information,  use)  is  vari- 
able in  detail  and  quality.  The  large 
quantity  of  inconsistent  data  is  diffi- 
cult to  use,  especially  when  specific 
information  is  needed.  A  key  component 
in  developing  an  understanding  of  the 
ground-water  flow  system  is  the  compila- 
tion of  information  from  these  wells  and 
the  synthesis  of  that  information  to 
characterize  the  system. 

This  report  presents  an  overview  of 
the  compilation  and  synthesis  of  infor- 
mation from  wells  in  a  part  of  the  San 
Joaquin  Valley,  California.  The  study 
area  is  between  Los  Banos  and  Kettleman 
City  in  the  central  part  of  the  valley 
(fig.  1).  It  is  bounded  on  the  west  by 
the  Coast  Ranges  and  on  the  east  by 
the  San  Joaquin  River  and  the  Fresno 
Slough.  Some  of  the  wells  included  in 
this  report  are  outside  the  boundaries 
of  the  study  area. 


Well  information  collected  from  sev- 
eral agencies  was  compiled  into  a  common 
data  base.  These  wells  then  were  clas- 
sified into  categories  based  on  the 
hydrogeology  of  the  ground-water  flow 
system.  Each  category  is  represented  by 
a  location  map  and  a  well  list.  The  map 
illustrates  the  areal  distribution  of  the 
wells  in  a  category.  It  is  not  meant  to 
provide  construction  information  for  a 
particular  well.  Instead,  the  well  list 
can  be  used  in  conjunction  with  the  com- 
puter programs  provided  in  this  report 
to  access  and  retrieve  specific  informa- 
tion for  a  particular  well  without  manu- 
ally searching  through  the  voluminous 
data  base.  The  actual  data  are  not  pre- 
sented but  are  available  on  request  for 
review  at  the  California  district  office 
of  the  U.S.    Geological   Survey. 

The  distribution  of  the  wells  is  used 
further  to  compile  information  about  the 
ground-water  flow  system  and  drilling 
practices  in  the  western  San  Joaquin 
Valley.  This  information  can  be  used  as 
a  starting  point  for  further  hydrologic 
investigations    in   the   San   Joaquin   Valley. 

This  study  is  part  of  a  comprehen- 
sive investigation  by  the  U.S.  Geological 
Survey  of  the  hydrology  and  geochem- 
istry of  the  San  Joaquin  Valley.  The 
studies  are  being  done  as  part  of  the 
Regional  Aquifer  System  Analysis 
Program  of  the  U.S.  Geological  Survey 
in  cooperation  with  the  San  Joaquin 
Valley  Drainage  Program.  The  authors 
would  like  to  thank  the  following 
agencies  for  providing  data  and  assist- 
ance: U.S.  Bureau  of  Reclamation,  Cali- 
fornia Department  of  Water  Resources, 
and  Westlands  Water   District. 
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Figure   1 .      Location  of  study  area. 
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HYDROGEOLOCY 

The  San  Joaquin  Valley  is  underlain 
by  several  thousand  feet  of  unconsoli- 
dated sediments.  The  upper  several 
hundred  to  more  than  1,000  feet  of 
these  sediments  contain  primarily  fresh 
ground  water  (Gilliom  and  others,  1989, 
p.  13).  The  Pleistocene  Corcoran  Clay 
Member  of  the  Tulare  Formation  divides 
the  ground-water  flow  system  into  an 
upper  semiconfined  zone  and  a  lower  con- 
fined zone.  In  the  semiconfined  zone, 
three  hydrogeologic  units  can  be  recog- 
nized: Coast  Range  alluvium,  Sierran 
sand,    and    flood-basin    deposits    (fig.    2). 

The  Coast  Range  alluvium  consists 
of  poorly  sorted  alluvial-fan  deposits 
derived  from  the  Coast  Ranges  to  the 
west.  The  thickness  ranges  from  850 
feet    near     the     Coast     Ranges     to    0    feet 


along  the  valley  trough  (Page,  1986). 
Textures  range  from  more  than  80  per- 
cent sand  and  gravel  in  the  fanhead 
regions  to  more  than  80  percent  silt 
and  clay  in  the  distal  regions  (Laudon 
and    Belitz,    1989). 

As  the  Coast  Range  alluvium  thins 
to  the  east,  it  interfingers  with  sedi- 
ment derived  from  the  Sierra  Nevada.  At 
depth,  the  Sierran  deposits  are  primarily 
well-sorted  micaceous  sand.  The  Sierran 
sand  is  as  much  as  500  feet  thick  in  the 
valley  trough  and  thins  to  the  east  and 
west. 

Flood-basin  deposits  form  a  thin 
layer  (5  to  35  feet  thick)  over  the 
Sierran  sand  in  the  valley  trough.  They 
are  primarily  composed  of  clays  derived 
from  the  Coast  Ranges  and  the  Sierra 
Nevada. 


WEST 


EAST 


VERTICAL  EXAGGERATION  =  26X 


Figure  2.      Generalized  hydrogeologic  section  of  the  study  area  perpendicular  to  the 
axis  of  the  San  Joaquin    Valley. 
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The  Corcoran  Clay  Member  of  the 
Tulare  Formation,  which  separates  the 
semiconfined  and  confined  zones,  con- 
sists of  silty  clay  to  clayey  silt  in  the 
upper  two-thirds  of  the  unit,  and  sand- 
silt-clay  to  clayey  silt  in  the  lower 
one-third  (Bull,  1975).  The  base  of  the 
unit  ranges  from  more  than  850  feet  in 
depth  along  the  Coast  Ranges  to  400  feet 
along  the  valley  trough  {Bull  and  Miller, 
1975),  The  Corcoran  ranges  in  thick- 
ness from  20  to  120  feet  (Miller  and 
others,    1971), 

The  lower  confined  zone  below  the 
Corcoran  consists  of  poorly  consolidated 
flood-plain,  deltaic,  alluvial-fan,  and 
lacustrine  deposits  of  the  Tulare  Forma- 
tion, The  confined  zone  extends  several 
hundred  feet  below  the  Corcoran  before 
saline  water   is  encountered. 

For  more  information  on  the  hydro- 
geology  of  the  study  area  see  Belitz 
(1988)     and     Gilliom     and     others     (1989), 


WELL   INFORMATION 

Well  information  was  assembled  from 
several  sources:  the  U.S,  Bureau  of 
Reclamation,  California  Department  of 
Water  Resources,  Westlands  Water  Dis- 
trict, and  the  U,S.  Geological  Survey, 
Additional  information  on  well  depths  and 
perforations  was  obtained  from  the  Sur- 
vey's Ground  Water  Site  Inventory  data 
base,  well  logs  from  the  Survey's  files, 
and  information  found  in  Ireland  (1963) 
and    LeBlanc    (1970), 

The  wells  are  identified  according  to 
their  location  in  the  rectangular  system 
for  the  subdivision  of  public  land,  the 
Public  Land  Survey  System,  The  identi- 
fication consists  of  the  township  num- 
ber, north  or  south;  the  range  number, 
east    or    west;     and    the    section    number. 


The  section  is  further  subdivided  into 
16  tracts  of  40  acres  each  consecu- 
tively lettered  (excepting  I  and  0), 
beginning  with  A  in  the  northeast  corner 
of  the  section  and  progressing  in  a 
sinusoidal  manner  to  R  in  the  southeast 
corner.  Wells  within  the  40-acre  tract 
are  numbered  sequentially.  An  example  of 
a  well  identification  is  13S13E13D01.  All 
wells  are  reinforced  to  the  Mount  Diablo 
base     line     and     meridian.  This     well- 

numbering    system    is    shown    in    figure    3, 

For  consistency,  all  data  were  con- 
verted to  a  format  used  by  the  Bureau 
of  Reclamation.  The  format  consists  of  a 
well  header,  followed  by  water-level 
measurements.  Each  well  header  has  a 
location  by  township,  range,  section,  and 
quarter-quarter  section,  and  when  avail- 
able, well  depth  and  period  of  record  for 
the  water-level  measurements.  Water- 
level  entries  include  measuring-point 
altitude,  land-surface  altitude,  depth 
to  water  from  measuring  point,  depth  to 
water  from  land  surface,  and  water- 
surface  altitude.  Water  levels  are 
recorded  on  several  different  schedules: 
monthly,  quarterly,  biannually,  or  mis- 
cellaneous measurements.  The  entire  data 
base  can  be  examined  at  the  California 
District  office  of  the  U,S.  Geological 
Survey, 

Because  of  the  large  quantity  of  data, 
several  Fortran  programs  were  written  to 
systematically  search  the  data  base  for 
wells  by  location,  depth,  and  period  of 
record.  These  programs  (Data_Recovery , 
Strip_Headers,  Depth_Sort,  ~Strip_Loc, 
Date_Select,  WL_Diff)  are  described  and 
presented  in  the  Appendix,  Sample  Data 
and  Program  Documentation,  at  the  back 
of  this   report, 

A  geographic  information  system  data 
base  also  was  created  Ij  store  well- 
construction  information  and  to  provide 
a  spatial   reference  for  the  data. 
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13S13E13O01 


Figure  3,      Weil-numbering  system. 
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DISTRIBUTION   OF  WELLS 


TABLE   ^  .--Description  of  wells 


The  data  base  contains  information 
from  5,860  wells.  This  report  focuses 
on  wells  within  the  previously  described 
study  area,  which  limits  the  data  set  to 
4,715  wells.  Of  these  4,715  wells,  3,050 
wells  have  depth  information  and  1  ,407 
have  perforated  length  information.  How- 
ever, only  2,547  wells  have  sufficient 
information  on  depth 
length  for  classification 
cally  useful  categories, 
gories  were  identified: 
forated  in  the  semiconfined 
depths     less     than     or    equal     to 


Description  of  wel Is 


Number 
of  wel Is 


and      perforated 

into    hydrologi- 

Four   such   cate- 

( 1 )     wells    per- 

zone     at 

50     feet. 


(2)  wells  perforated  in  the  semicon- 
fined zone  at  depths  greater  than  50 
feet,  (3)  wells  perforated  in  the  semi- 
confined  and  confined  zones,  and  (4) 
wells  perforated  only  in  the  confined 
zone.  (See      table      1      for      additional 

detail).  An  additional  253  wells  were 
drilled  below  the  Corcoran  Clay  Member 
of  the  Tulare  Formation,  but  perforation 
information  was  not  available  to  help 
determine  which  zones  they  were  perfora- 
ted in.  Also,  267  wells  are  in  areas 
where      the      Corcoran      is      not      present. 

A  discussion  of  these  categories  is 
presented  in  the  following  sections. 
Each  section  describes  the  wells  and 
their  location  in  the  semiconfined  and 
confined  zones.  Maps  of  well  locations 
are  included  to  illustrate  the  areal  dis- 
tribution of  the  wells.  Complete  list- 
ings of  wells  in  each  category  can  be 
used  in  conjunction  with  the  programs 
provided  in  the  Appendix  to  retrieve 
information  on   the  specific  wells. 


Wells   Perforated   in   the  Semiconfined 

Zone  at   Depths   Less   Than  or 

Equal   to  50   Feet 

There  are  1,114  wells  perforated  in 
the  semiconfined  zone  at  depths  less 
than   or   equal    to   50    feet.      Most  of  these 


Wells  perforated  in  the  semi- 
confined  zone  at  depths  less 
than  or  equal  to  50  feet 
generally  used  as  observation 
wel Is. 

1  to  20 637 

21  to  50 477 

Subtotal 1,114 

Wells  perforated  in  the  semi- 
confined  zone  at  depths  greater 
than  50  feet. 

Coast  Range  alluvium 155 

Sierran  sand 275 

Coast  Range  alluvium  and 

Sierran  sand 21 

No  perforation  information 39 

Subtotal 490 

Wells  perforated  in  the  semi- 
confined  and  confined  zones 533 

Wells  perforated  only  in  the 

confined  zone 410 

Total  2,547 


shallow  wells  are  observation  wells. 
Numerous  wells  at  depths  less  than  or 
equal  to  20  feet  were  installed  by  the 
U.S.  Bureau  of  Reclamation  and  are 
maintained  by  the  Westlands  Water 
District  to  monitor  the  water  table. 
These  wells  are  perforated  over  the 
entire  length  of  the  well  (Westlands 
Water  District,  oral  commun.,  1987). 
Many  wells  at  depths  of  about  50  feet 
are  along  the  California  Aqueduct. 
The  western  limit  of  the  20-foot  wells 
(fig.  4)  reflects  the  upslope  limit  of 
the  area  underlain  by  a  water  table 
within  20   feet  of  the  land  surface. 
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Figure  4.      Areal  distribution  of  wells  perforated  in   the  semiconfined  zone  at  depths 
less   than  or  equal   to  20  feet. 


The  637  wells  perforated  within  20  feet 
of  the  land  surface  are  uniformly  dis- 
tributed over  the  area  where  the  depth 
to  water  is  less  than  20  feet.  Figure  5 
indicates  a  sparser  coverage  of  wells  at 
depths  of  21  to  50  feet  over  the  study 
area,  with  a  concentration  of  wells 
along  the  California  Aqueduct. 


Wells   Perforated   in   the  Semiconfined 
Zone  at  Depths  Greater  Than   50   Feet 

There  are  490  wells  perforated  in 
the  semiconfined  zone  at  depths  greater 
than  50  feet.  These  wells  are  classi- 
fied by  the  type  of  deposits  they  are 
perforated   in. 
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Figure  5.      Areal  distribution  of  wells  perforated  in   the  semiconfined  zone  at  depths 
of  21    to  50  feet. 


Perforated  lengths  of  the  wells  were 
compared  to  thickness  maps  of  the  Coast 
Range  alluvium  and  Sierran  sand  (Miller 
and  others,  1971).  Because  the  flood- 
plain  deposits  generally  are  less  than 
50  feet  thick,  an  attempt  was  not  made 
to      separate      wells      perforated      in      the 


flood-plain  deposits  from  those  perfo- 
rated in  the  Sierran  sand.  There  are  155 
wells  perforated  in  Coast  Range  alluvium 
(fig.  6;  table  2),  275  in  Sierran  sand 
(fig.  7;  table  3),  21  in  both  (fig.  8; 
table  4),  and  39  wells  without  sufficient 
information  to  determine  which  deposits 
they   perforated. 
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Figure  6.      Areal  distribution  of  wells  perforated  in   the  semiconfined  zone  at  depths 
greater  than  50  feet   with  perforated  lengths  in   the  Coast  Range  alluvium. 
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TABLE  2. — Wells  perforated  in   the  semiconfined  zone  at  depths  greater  than 
50  feet   with  perforated  lengths  in   the  Coast   Range  alluvium 


10S10E02R01 
10S10E05P01 

lOSiOEnooi 

10S10E13D01 

10S10E26F01 
10S10E28D01 
10S10E29A01 
10S10E32K02 

10S10E32N01 
10S11E19M01 
10S11E30D01 
IISIOEO'tDOl 

nSIOECtPOl 
lISIOEO'tROl 
nSIOElOEOI 
11S10E13M01 

nSIOEHNOI 
11S10E16C01 
nS12E19P01 
11S12E20E01 

11S12E21K01 
nS12E29J01 
11S12E30J03 
12S11E06N01 

12SnE28C01 
12SnE34C01 


12SnE3'*R02 
12S12E06D01 
12S12E15N01 
12S12E20J01 

12S12E25D02 
13S11E02K01 
13S11E12D01 
13SnE12001 

13SnE12002 
13S12E17N01 
13512E18E01 
13S12E18E02 

13S12E18L01 
13S12E18R01 
13S12E20D02 
13S12E20F0: 

13S12E20J01 
13S12E20R02 
13S12E28D03 
13S12E33BO't 

13S12E3'*P02 
13S12E36D03 
13S12E36D0'i 
13S13E15R01 

13S13E16E01 
13S13E30D01 


13S13E3'tP01 
13SUE17N02 
13S1'4E21MO'i 
US12E12J01 

1'tS12E26H01 
US13E16N0't 
US13E17K03 
US13E23R01 

14S13E24N02 
1'(S13E24N05 
1'fS13E2'tN06 
US13E2'fN07 

HS13E30N04 
TtSUEOSDOl 
USUE05H01 
USTtE22N04 

1'tSUE28E02 
HSUE29N02 
15S12E02A01 
15S12E11H01 

15S12E11H02 
15S12E24R01 
15S13E07A01 
15S13E11B02 

15S13E11D03 
15S13E12NO't 


ISSnET^ROI 
15S13E20D01 
15S13E32F01 
ISSUEIOAOI 

15STtE10A02 
15S14E10A03 
ISST+EIIEOI 
15SUE19R01 

15STtE30K01 
15SHE31H02 
15SUE31H03 
15STtE32N03 

15S15E09D05 
15S15E18N01 
16S13E01A01 
16S13E03R01 

16SUE02N01 
16SUE04N04 
16S14E0itP01 
leSTtEOSCOl 

16SUE09N01 
16SUE13C01 
16SUE13C0't 
16Sl'tE20D01 

16SUE26A01 
16S15E02N02 


16S15E18P02 
16S15E19H01 
16S15E22R01 
16S15E29B02 

16S15E32A03 
16S15E32A05 
16S15E33E01 
16S15E3'tN05 

16S16E05R02 
17S15E25K01 
17S15E28A01 
17S16E09R02 

17S16E30A03 
18S15E03A02 
18S16E09N01 
18S16E23A02 

18S16E2'*D02 
18S16E33A0't 
18S16E34H02 
18S17E05N04 

18S17E22N01 
18S17E27J01 
18S17E35R02 
18S18E30J02 

19S16E05H02 
19S16E05H03 


19S16E05H0't 
19S17E23P01 
19S18E2'*001 
19S18E27R01 

19S18E33M01 
19S18E33M02 
19S19E15A02 
19S19E16N02 

20S18En001 
20S18E31R01 
20S18E3'tN01 
20S18E3'tN02 

20S19E29R01 
20S19E31P02 
21S18E23D05 
21S18E28B01 

21S18E3'*K02 
21S18E3'*001 
21S19E0'»B01 
21S19E17R02 

21S19E19D01 
22S18EnR01 
22S18E12P01 
22S18E12P02 

22S18E13K01 


Many  wells  perforated  in  the  Coast 
Range  alluvium  are  along  the  California 
Aqueduct.  A  large  number  (41)  of  these 
are  observation  wells  monitoring  the 
aqueduct.  These  wells  range  in  depth 
from  50  to  60  feet  and  190  to  210  feet. 
The  remaining  114  wells  tap  the  Coast 
Range    alluvium    as     a     source    of    water. 


The  average  perforation  length  for  these 
wells  is  114  feet.  Most  of  the  wells 
have  perforated  lengths  less  than  100 
feet  (table  5).  The  small  number  and 
relatively  short  perforated  lengths 
of  these  wells  reflects  the  relatively 
low  transmissivity  of  the  Coast  Range 
alluvium. 
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Figure  7.      Areal  distribution  of  wells  perforated  in   the  semiconfined  zone  at  depths 
greater  than  50  feet  with  perforated  lengths  in   the  Sierran  sand. 
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TABLE  3. — Wells  perforated  in   the  semiconfined  zone  at  depths  greater  than 
50  feet   with  perforated  lengths   in   the  Sierran   sand 


10S12E09P01 
10S12E11L01 
10S12E13A01 
10S12E13L01 

10S12E16001 

10S12E17J01 
10S12E20R01 
10S12E21K01 

10S12E27J01 
10S12E27K01 
10S12E35K01 
10S13E09K01 

10S13E16R01 

10S13E2itC01 
10S13E26J01 
10S13E28C01 

10S13E30D01 
10S13E33J01 
lOSnESitCOl 
10S13E35R01 

10ST(E08N01 
10SUE16001 
10SUE35K01 
10SUE35L01 

11S13E02C01 
nS13E07A01 
11S13EUJ01 
11S13E16D02 

11S13E17E01 
11S13E17L01 
nS13E17R01 
11S13E22C01 

11S13E23M01 
11S13E26A01 
nS13E26F01 
nS13E28F01 

nS13E28N01 
11S13E28R01 
11S13E33L01 
lISISESifCOl 

11S13E3'tE01 
11S13E35J01 
11S13E36C01 
11SHE06M01 

nSUE09A03 
11SUE13H01 


11SUE13L01 
IISTtEISCOl 
nSUE16A01 
11S1'»E17J01 

nsT+EieRoi 

nSUE21N01 
11S1'tE25R01 
11SUE26L01 

11SHE27F01 
11SUE31J01 
nSHE33D01 
11SUE33N01 

IIST+ESSOOI 
11SUE36C01 
11SUE36R01 
12S13E02A01 

12S13E02R01 
12S13En001 
12S13E13J01 
12S1'tE04N01 

12S14E07K01 
12SUE20K01 
12SHE20R01 
12SUE21M01 

12SUE25H01 
12SUE27M01 
12SHE330O1 
12SUE3'tJ03 

12SUE35M01 
13SUE03C01 
13SHE03L01 
13SUE11B01 

13SUE12L01 
13SUE13L01 
13SUE2itM01 
13SUE25H01 

13S14E25K01 
13S15E01N01 
13S15E02K01 
13S15E03M01 

13S15E05001 
13S15E09H01 
13S15E11B01 
13S15EnF01 

13S15E11P01 
nSISEUEOI 


13S15EUM01 
13S15EUP02 
13S15E16L01 
13S15E18M01 

13S15E19R01 
13S15E20D01 
13S15E21001 
13S15E22J01 

13S15E25F01 
13S15E25L01 
13S15E25N01 
13S15E25N02 

13S15E25P01 

13S15E26C01 
13S15E26H01 
13S15E26K01 

13S15E27F01 
13S15E28G01 
13S15E28H01 
13S15E30C01 

13S15E31J0't 
13S15E3'tA01 
ISSISES'tJOl 
13S15E34J02 

13S15E35D05 
USUE13E03 
HS15E03A01 
14S15E03K02 

US15E03K0't 
l'tS15E05A02 
US15E05A03 
USlSEOSACt 

US15E05A05 
US15E08C0't 
US15E25H02 
TtS15E25K01 

HS15E28L0'J 
US15E35N01 
US15E35R01 
HS16E03P01 

US16E04A01 
14S16E05C01 
TtSlGEOGAOl 
USIGEOGCOI 

US16E12A01 
14S16E23M01 


US16E33N01 
l'tS16E35P01 
US16E36A01 
15S15E09D02 

15S15E09D03 
15S15E16K01 
15S15E16K02 
15S15E17A01 

15S15E3'tP01 
15S15E23M01 
15S15E27C01 
15S16E01L01 

15S16E01N01 
15S16E02B01 
15SieE12B01 
15S16E12C02 

15S16E13J01 
15S16E26A01 
15S16E28A02 
15S16E31N03 

15S17E03A01 
15S17E03R01 
15S17E06H01 
15S17E07H01 

15S17E08H01 
15S17E10R01 
15S17E10R02 
15S17EnA01 

15S17E13R01 
15S17E15R01 
15S17E19M01 
15S17E22H01 

15S17E22R01 
15S17E23R01 
15S17E32L03 
15S17E3'*J01 

15S17E3'f003 
15S17E36L01 
16S16E01R01 
16S16E11N02 

16S16E18D01 
16S17E01P01 
16S17E02M01 
16S17E07N01 

16S17E10F01 
16S17E12J01 


16S17E16A01 
16S17E16J01 
16S17E18P01 
16S17E20N02 

16S17E23D02 
16S17E23N01 
16S17E2'tR01 
16S17E30M01 

16S17E31001 
16S17E3i(001 
16S18E10A01 
16S18E18A01 

16S18E22J01 
16S18E26A02 
16S18E31001 
16S18E3itR01 

16S18E36P01 
16S19E02D01 
16S19E03001 
16S19E05F01 

16S19E08R01 
16S19E10E01 
16S19E30C01 
16S19E32P01 

17S17E02N01 
17S17E23001 
17S17E25N01 
17S17E26E0'* 

17S17E27R02 
17S17E28R0'^ 
17S17E33N01 
17S17E35P01 

17S18E01B01 
17S18E02A01 
17S18E06E01 
17S18E08001 

17S18E08R01 
17S18E09D01 
17S18E12N01 
17S18EHB01 

17S18E21002 
17S18E2'(P01 
17S18E28P01 
17S18E35001 

17S19E01C01 

17S19E02H01 


17S19E07R01 
17S19E10A01 
17S19E12M01 
17S19E14J01 

17S19E15P01 
17S19E15P02 
17S19E20A01 
17S19E2'fF01 

17S19E26H01 
17S19E30K01 
17S19E36A01 
17S20E02M01 

17S20E02J01 

17S20EO'*B01 
17S20EUP01 
17S20E20D01 

17S20E22P01 
17S20E21A01 
17S20E30A01 
17S20E31F01 

17S20E3'»N01 
17S20E36C01 
17S20E35E01 
18S18E03N01 

18S18E05K01 
18S18E24N01 
18S19E02F02 
18S19E01P01 

18S19E05B01 
18S19E06G01 
18S19E06N02 
18S19E07P02 

18S19E06002 
18S19E10M01 
18S19E20P02 
18S19E20P03 

18S19E21R03 
18S19E28001 
18S20E02M01 
18S20E09M01 

18520E10M01 
18S20E17R01 
18S20E19N01 
19S19E10E02 

19S19E30D01 
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Figure  8.      Areal  distribution  of  wells  perforated  in   the  semiconfined  zone  at  depths 
greater  than   50  feet   with  perforated  lengths  in   the  Coast  Range  alluvium  and 
Sierran  sand. 
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TABLE   ^. --Wells  perforated  in    the  semi- 
confined  zone  at  depths   greater  than 
50  feet   with  perforated  lengths   in 
the  Coast  Range  alluvium  and  Sierran 
sand 


11SnE12K03 
nS12E19A01 
12S13E07N01 
13SUE25J01 

13S15E31J05 
1'iSUE02C02 
USUE16N01 


15SHE23D02 
16S16E03E02 
16S16E18N01 
16S16E20N01 

16S16E28M01 
17S16E02E01 
17S17E23H02 


17S17E27R01 
17S17E35E01 
17S18E31N02 
18S18E07R01 

18S18E07R02 
18S18E09E01 
18S18E09N01 


TABLE   5 .--Number  of  wells  perforated 
in    the  semiconfined  zone  at  depths 
greater  than   50  feet   with  perforated 
lengths  in    the  Coast   Range  alluvium 
and  Sierran  sand 


Wells  perforated  in  the  Sierran  sand 
are  primarily  in  the  valley  trough,  where 
the  Sierran  sand  is  at  least  200  feet 
thick.  There  are  275  wells  perforated 
in  the  Sierran  sand.  The  average  perfor- 
ated length  of  these  wells  is  154  feet. 
Most  of  the  wells  have  perforated  lengths 
more  than  100  feet  (table  2).  The  large 
number  and  relatively  long  perforated 
length  of  these  wells  reflects  the  high 
transmissivity  of  the  Sierran   sand. 

The  concentration  of  wells  in  the 
semiconfined  zone  perforated  in  the 
Sierran  sand  and  the  longer  perforated 
length  of  wells  tapping  the  Sierran  sand 
compared  to  wells  tapping  the  Coast 
Range  alluvium  indicate  a  tendency  to 
use  the  Sierran  sand  rather  than  the 
Coast  Range  alluvium  as  a  source  of 
water. 


Number 

of  wells 

Perforated 

length 
(feet) 

Coast 

Range 

al luvium 

Sierran 
sand 

Less  than  50 

12 

19 

51  to  100 

21 

27 

101  to  250 

22 

81 

Greater  than  250.., 

4 

22 

No  perforation 

information 

55 

126 

Total 

114 

275 

Average  length 

(feet) 

114 

154 

Wells   Perforated   in   the  Semiconfined 
and  Confined   Zones 


There  are  533  wells  perforated  in 
the  semiconfined  and  confined  zones. 
The  wells  are  grouped  by  the  perforated 
length  above  and  below  the  Corcoran 
Clay  Member  where  Sierran  sand  is  pre- 
sent and  absent  (table  6).  The  wells 
are  presented  by  perforated  length  above 
the  Corcoran  in  figure  9  and  below  the 
Corcoran  in  figure  10;  these  wells  are 
listed   in   table  7. 
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TABLE  6. — Number  of  wells  perforated  in 
the  semiconfined  and  confined  zones   with 
perforated  lengths  above  and  below   the 
Corcoran   Clay   Member  of  the    Tulare 
Formation   where  Sierran  sand  is 
present  and  absent 


Perforated 

length  below 

the  Corcoran 

where  Sierran 

sand  is  present 

(feet) 


Perforated  length  above  the 

Corcoran  where  Sierran  sand  is 

present  (feet) 


Less  than  or 
equal  to  50. 

51  to  100 

101  to  500 

501  to  1,000.. 

Greater  than 
1,000 


Less  than 

or  equal 

to  50 

51  to 
100 

101  to 
250 

251  to 
500 

Number 

of  wel 1 s 

0 

0 

4 

9 

0 

0 

2 

8 

8 

9 

41 

22 

17 

37 

k9 

10 

6 

7 

9 

0 

Perforated 

length  below 

the  Corcoran 

where  Sierran 

sand  is  absent 

(feet) 


Perforated  length  above  the 

Corcoran  where  Sierran  sand  is 

absent  (feet) 


Less  than 

or  equal 

to  50 


51  to 
100 


101  to  251  to 
250     500 


Number  of  wel  1  s 


Less  than  or 

equal  to  50 0 

51  to  100 0 

101  to  500 3 

501  to  1,000 23 

Greater  than 

1,000 42 


0 

0 

7 

22 

48 


1 

0 

9 

40 

62 


3 

0 
10 
12 

13 


Most  of  the  wells  have  perforated 
lengths  less  than  250  feet  above  the 
Corcoran  and  all  have  perforated  lengths 
less  than  500  feet  above  the  Corcoran. 
In  contrast,  most  of  the  wells  (397) 
have  perforated  lengths  greater  than  500 
feet  below  the  Corcoran.  The  distribu- 
tion of  perforated  length  reflects  the 
tendency  to  use  the  confined  system  as 
the   principal   supply  of  water. 

The  degree  to  which  the  confined 
aquifer  system  is  tapped  as  a  source  of 
supply  depends,  in  part,  on  the  pres- 
ence or  absence  of  Sierran  sand  above 
the  Corcoran.  There  are  238  wells  in  or 
near  the  valley  trough  where  the  Sierran 
sand  is  present  with  a  total  perforated 
length  of  38,527  feet  above  the  Corcoran 
and  132,023  feet  below  the  Corcoran. 
These  wells  have  an  average  perforated 
length  of  162  feet  above  the  Corcoran 
and  555  feet  below  the  Corcoran.  In 
contrast,  the  295  wells  upslope  of  the 
valley  trough,  where  the  Sierran  sand  is 
absent,  have  a  total  perforated  length  of 
39,034  feet  above  the  Corcoran  and 
291,051  feet  below  the  Corcoran.  These 
wells  have  an  average  perforated  length 
of  132  feet  above  the  Corcoran  and  987 
feet  below  the  Corcoran.  The  distribu- 
tion of  perforated  length  indicates  that 
water  supply  wells  need  to  be  drilled 
deeper  into  the  confined  zone  where  the 
Sierran  sand  is  absent  than  where  it  is 
present   (table  6). 
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Figure  9,      A  real  distribution  of  wells  perforated  in   the  semiconfined  and  confined 
zones   with  perforated  lengths  above   the  Corcoran  Clay  Member  of  the    Tulare 
Formation . 
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Figure  10.      A  real  distribution  of  wells  perforated  in   the  semicon  fined  and  confined 
zones   with  perforated  lengths  below  the  Corcoran  Clay  Member  of  the    Tulare 
Formation. 
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TABLE  7, — Wells  perforated  in   the  semiconfined  and  confined  zones   with  perforated 
lengths  above  and  below   the  Corcoran   Clay  Member  of  the    Tulare  Formation 


nS10E22F01 
11S11E35R01 
12S12E06H01 
12S12E25N01 

12S12E3'tN01 
12S13E33001 
13S12E02F01 
13S12E03N01 

13S12E09H02 
13S12E1'f0O1 
13S12E22N01 
13S12E36D02 

13S12E36M01 
13S13E09001 
13S13E10R01 
13S13E15M01 

13S13E18001 
13S13E22N01 
13S13E23N01 
13S13E25N01 

13S13E25N02 
13S13E26M01 
13S13E26N02 
13S13E26001 

13S13E32N02 
13S13E3'tN0't 
13S13E36F01 
13S13E36P02 

13SUE15B01 
13S1'fE21N01 
13SUE31N01 
13SUE33M01 

13SUE33N01 
13S15E31J06 
1'tS12E02R02 
HS12E36001 

14S13E01C01 
US13E01C02 
HS13E03N01 
1'tS13E07E02 

HS13E09E01 
1'*S13E12N01 
TtSnEISMOl 
US13E15001 

US13E16N01 
USISEISNOI 
1'»S13E21N01 
US13E22N01 

1'fS13E2'*N01 
US13E26N01 
US13E28P01 
US13E29N01 


US13E29001 
US13E29R01 
HS13E3O0O1 
1'tS13E35E01 

T(S13E35N01 
U513E36N01 
HS1'iE03N02 
USHE06M01 

1'(SUE06N02 
T*S1'*E07M01 
US1'fE12N02 
HS1'tE17M01 

TtSUE17001 
USHE17003 
TtSHEISNOI 
USHE20N01 

HSUE21C02 
USHE21K01 
US1'*E28G01 
HS14E28N01 

HSHE28R01 
USUE29001 
TtSTtE32E02 
HSUE33N01 

14SUE33001 
HSHESifDOl 
USUE3'tN01 
HSHESitPOl 

USUE35N01 
USHE36N01 
1'iS15E3iN01 
15S13E01N01 

15S13E02E01 
15S13E03N01 
ISSISEOitEOI 
15S13E05D01 

15S13E05N01 
15S13E05R01 
15S13E09E01 
15S13EUN01 

15S13E16N01 
15S13E26J01 
15S13E36P01 
15S13E36P02 

15SUE01K01 
15S1'tE02B01 
15S1'tE03H01 
15SHE03001 

15SUE0'»D01 
ISSTfEOitJOl 
15SUE04L01 
15S1'*E0<4M01 


15ST4E06D01 
ISSUEOGHOI 
15Sl'iE06H02 
15SHE07B01 

15SUE09E01 
15SUE09H01 
15SUE09N01 
15SUE11D01 

15S1'tEnE02 
15SUE12M01 
ISSUEUHOI 
15SUE17C01 

15SUE17J01 
15SUE17001 
15S14E18D01 
15SUE18001 

15SUC21P01 
15SUE23B03 
15S1'(E23D03 
15S14E24N01 

15SnE25001 
15SUE28D01 
15SUE29Q01 
15SUE30E01 

15SHE30N01 
15SUE32N02 
15S15EUA01 
15S15E17D01 

15S15E20N02 
15S15E30N02 
15S15E33E01 
15S16E07H01 

15S16E09001 
15S16E12C03 
15S16E17R01 
15S16E20R01 

15S16E25R01 
15S17E3'tA01 
16SHE01002 
16STfE02J01 

16SUE03E01 
leSI'iEO'tDOl 
leSUEO^FOI 
16STtE0'*H01 

16SUE05L01 
leSTtEIONOI 
16SUE10001 
leSTtEHBOl 

16SHE11G02 
16SHEUN01 
leSTtEISOOl 
16ST»E23N01 


16S1'»E2'»E01 
16SUE24P01 
16S1'tE2'tR01 
16S1'iE25D01 

16SUE25R01 
16SUE36E01 
16515E02N01 
16S15E06K01 

16S15E08N01 
16S15E09001 
16S15E10N02 
leSISEIONOif 

16S15E12N01 
16S15E13N01 
16S15E17N01 
16S15E18N01 

16S15E19001 
16S15E20C01 
16S15E23E03 
16S15E23F01 

16S15E23N02 
16S15E25K01 
16S15E25002 
16S15E27D01 

16S15E27E01 
16S15E27P01 
16S15E35E01 
16S15E36R01 

16S16E01N01 
16S16E0'tN01 
16S16E05N01 
16S16E06N01 

16S16E08E01 
16S16E08N01 
16S16E10N01 
16S16E22E01 

16S16E28J01 
16S16E30M01 
16S16E30N01 
16S16E32E02 

16S16E32F01 
16S16E3'*H01 
16S16E3'<N02 
16S17E13E01 

16S17E16P01 
16S17E17H01 
16S17E17N01 
16S17E18M01 

16S17E2'iF01 
16S17E26N01 
16S17E28N01 
16S17E30001 


16S17E32N01 
16S17E33R01 
16S18E09F01 
16S18E33P01 

16S18E33P02 
17S15E13A01 
17S15E13D01 
17S15E25N01 

17S15E27001 
17S16E01N02 
17S16E03E01 
17S16E0'tN02 

17S16E0'tR02 
17S16E06C01 
17S16E08L01 
17S16E08M02 

17S16E10N01 
17S16E11N03 
17S16E11001 
17S16E13D01 

17S16E13N01 
17S16E13N02 
17S16E23N02 
17S16E2'tR01 

17S16E25H01 
17S16E25N01 
17S16E25N02 
17S16E25P01 

17S16E25001 
17S16E26N0'( 
17S16E26002 
17S16E27N01 

17S16E27001 
17S16E28N01 
17S16E30A01 
17S16E32A01 

17S16E32N01 
17S16E35N01 
USWECtNOI 
17S17E15N01 

17S17E15N02 
17S17E17N01 
17S17E17N02 
17S17E19N01 

17S17E19N02 
17S17E19001 
17S17E20N01 
17S17E21D01 

17S17E21E01 
17S17E21N01 
17S17E21N02 
17S17E21R01 


17S17E2'»N01 
17S17E270O1 
17S17E27002 
17S17E29N01 

17S17E29N02 
17S17E30M01 
17S17E30N01 
17S17E30P02 

17S17E31001 
17S17E31R01 
17S17E3'tN01 
17S17E3'iP01 

17S17E35R01 
17S18E02P01 
17S18E03P01 
17S18E09K01 

17S18E09R01 
17S18E26M01 
17S18E33N01 
17S18E34N01 

17S19E07A01 
17S19E30C01 
17S19E31N01 
18S15E01N01 

18S16E01E01 
18S16E01N01 
18S16E07N01 
18S16E08R01 

18S16E12K01 
18S16ETtD01 
18S16E17M01 
18S16E18A02 

18S16E20N02 
18S16E21N01 
18S16E22N01 
18S16E22001 

18S16E25001 
18S16E26F01 
18S16E26F02 
18S16E30R01 

18S16E33001 
18S16E3'*001 
18S16E3'»R01 
18S16E35N01 

18S16E36C01 
18S16E36P01 
18S17E03P01 
18S17E05K01 

18S17E05K03 
18S17E05N03 
18S17E07L01 
18S17E07L02 
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TABLE  7. — Wells  perforated  in   the  semiconfined  and  confined  zones   with 
perforated  lengths  above  and  below   the  Corcoran  Clay  Member  of  the 
Tulare  Formation--ConVir\ued 


18S17E07N01 
18S17E07001 
18S17E08M01 
18S17E08P01 

18S17E08P02 
18S17E08R01 
18S17E12N01 
18S17E13N01 


18S17E36N03 
18S18E18N01 
18S18E19N01 
18S18E19N02 

18S18E20M01 
18S18E21E01 
18S18E21N01 
18S18E26N01 


19S17E10N01 
19S17E11N01 
19S17E13N01 
19S17EUC01 

19S17EU001 
19S17E15N01 
19S17E22M01 
19S17E22N01 


19S18E29N01 
19S18E31M01 
19S18E32E01 
19S18E32001 

19S18E33E02 
19S18E33N02 
19S18E33N03 
19S18E33001 


20S18E16E01 
20S18E16C01 
20S18E16C02 
20S18E20B01 

20S18E20C01 
20S18E20K01 
20S18E20001 
20S18E21M01 


21S18E02C01 
21S18E02M01 
21S18E02M02 
21S18E03A01 

21S18E03B01 
21S18E03C01 
21S18E04D02 
21S18E0'tK01 


18S17E13N02 
18S17E13P01 
18S17E13001 
18S17EUE01 


18S18E27N01 
18S18E29N01 
18S18E30N01 
18S18E31P01 


19S17E23N01 
19S17E2'tF01 
19S17E26H01 
19S17E26N01 


19S18E3'tN01 
19S18E35E01 
19S19E03D01 
19S19E06N01 


20S18E21N01 
20S18E22M01 
20S18E23N01 
20S18E2'fD01 


21S18E05C01 
21S18E08R01 
21S18E10C01 
21S18EnD01 


18S17ET4N02 
18S17EU001 
18S17E15E01 
18S17E20N02 


18S18E32E01 
18S18E33L01 
18S18E36N02 
18S19E19N01 


19S17E27E01 
19S17E27H01 
19S17E36B01 
19S17E36D02 


19S19E19001 
19S19E2'»E01 
19S19E27D01 
19S19E28K01 


20S18E2'tC01 
20S18E25D01 
20S18E25D02 
20S18E26K01 


21S18ETtD01 
21S18E15D01 
21S18E21H01 
21S18E21M01 


18S17E20001 
18S17E22N02 
18S17E22P01 
18S17E23E01 


19S16E01N01 
19S16E01001 
19S17E02C01 
19S17E02E01 


19S17E36E01 
19S18E03N02 
19S18E0'tC02 
19S18E05N01 


19S19E30B02 
19S19E3'>001 
20S17E01C01 
20S17E01E01 


20S18E27C02 
20S18E27D01 
20S18E27M01 
20S18E28B01 


21S18E23D06 
21S18E23E01 
21S18E26C01 
21S18E26N01 


18S17E23M01 
18S17E23N01 
18S17E23N02 
18S17E2'tN02 


19S17E02K01 
19S17E02N01 
19S17E0'tE01 
19S17E0'tN02 


19S18E07N01 
19S18E08N01 
19S18E09N02 
19S18E10NI01 


20S18E02N02 
20S18E03D01 
20S18E03M01 
20S18E03N01 


20S18E28D01 
20S18E28E01 
20S18E29N01 
20S18E29N02 


21S18E27B01 
21S18E27C01 
21S18E27002 
21S18E3'fF01 


18S17E25M01 
18S17E27E01 
18S17E27C01 
18S17E28M01 

18S17E28N01 
18S17E28N02 
18S17E29N02 
18S17E33001 

18S17E34E01 
18S17E3'tE02 
18S17E35G01 
18S17E35H01 
18S17E35N01 


19S17E05E01 
19S17E05N01 
19S17E05N03 
19S17E06A01 

19S17E06E01 
19S17E06P01 
19S17E08E02 
19S17E08H01 

19S17E08P01 
19S17E08R01 
19S17E09N01 
19S17E09001 
19S17E10M01 


19S18E13M01 
19S18E19M01 
19S18E20D01 
19S18E20D02 

19S18E20M01 
19S18E20N01 
19S18E22N01 
19S18E2'tN01 

19S18E26E02 

19S18E27M01 
19S18E28E01 
19S18E28N01 
19S18E28N02 


20S18E05D01 
20S18E05H01 
20S18E05N01 
20S18E06D01 

20S18E06N01 
20S18E08A01 
20S18E08G01 
20S18E09M01 

20S18E09N01 
20S18E10E01 
20S18EnN01 
20S18EUE01 
20S18EUN01 


20S18E32E01 
20S18E3tB01 
20S18E3'tD01 
20S18E35D01 

20S19E06N01 
20S19E10J01 
20S19E10N01 
20S19EnD01 

20S19E17A01 
20S19E19D01 
20S19E19N01 
20S19E29J01 
21S18E01B01 


21S18E35N01 
21S19E0'tM01 
21S19E06D01 
21S19E06D02 

21S19E06D03 
21S19E07D01 
21S19E07N01 
21S19E19E02 

21S19E20D01 
22S18E01E01 
22S18E03H01 
22S18E11L01 
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Wells   Perforated  Only  in   the 
Confined   Zone 

There  are  410  wells  perforated  only 
in  the  confined  zone  below  the  Corcoran 
Clay  Member  of  the  Tulare  Formation. 
Table  8  summarizes  these  wells  by  the 
relative  distance  between  the  bottom  of 
the  Corcoran  and  the  top  of  the  perfo- 
rated length  where  the  Sierran  sand  is 
present.  For  most  of  these  wells,  the 
top  of  the  perforated  length  starts 
within  the  first  100  feet  below  the  Cor- 
coran. These  wells  also  have  perforated 
lengths  ranging  from  100  to  more  than 
1,000  feet.  All  wells  are  presented  in 
figure  11  grouped  by  perforated  length. 
This  figure  shows  that,  in  general,  the 
perforated  length  increases  in  a  south- 
west direction  upslope  toward  the  Coast 
Ranges.  Table  9  lists  the  wells  perfo- 
rated only   in  the  confined   zone. 

Wells  perforated  only  in  the  con- 
fined zone  have  a  shorter  average  perfo- 
rated length  in  areas  where  the  Sierran 
sand  is  present  (628  feet)  than  in  areas 
where  the  Sierran  sand  is  absent  (987 
feet).  There  are  113  wells  in  the  valley 
trough,  where  the  Sierran  sand  is  pre- 
sent, with  a  total  perforated  length  of 
70,985  feet.  There  are  297  wells  upslope 
of  the  valley  trough  with  a  total  perfo- 
rated  length   of  293,038   feet. 

Most  of  the  wells  are  upslope  of  the 
valley  trough.  Wells  are  highly  concen- 
trated near  the  creeks  in  the  fanhead 
areas,  as  compared  to  the  interfan  areas. 
In  addition,  this  indicates  a  tendency 
for  locating  wells  in  the  coarser  grained 
sediments  of  the  upper-fan  areas  rather 
than  in  the  finer  grained  sediments  of 
the  interfan   areas. 


TABLE  8. — Number  of  wells  perforated 
only  in   the  confined  zone   with  per- 
forated lengths  below  the  Corcoran 
Clay  Member  of  the    Tulare  Formation 
where  the  Sierran  sand  is  present 
and  absent 


Distance 

between  bottom  c 

f  the  Corcoran 

Perfor- 
ated 

and  top  of  perforatec 
Sierran  sand  is 

length  where 
present  (feeti 

the 

length 
(feet) 

In 
Corcoran 

Less 

than 

51 

to 

101 
to 

501 
to 

Greater 
than 

50 

100 

500 

1,000 

1 

,000 

Less  than 

or  equal 

to  50... 

0 

1 

1 

3 

0 

0 

51  to 

100 

1 

0 

1 

1 

0 

0 

101  to 

500 

11 

12 

5 

8 

0 

0 

501  to 

1,000... 

23 

U 

4 

k 

0 

0 

Greater 

than 

1,000... 

10 

6 

4 

4 

0 

0 

Distance 

between  bottom  of  the  Corcoran 

Perfor- 
ated 

and  top  of  perforated  length  where 
Sierran  sand  is  absent  (feet) 

the 

length 
(feet) 

1  n 

Less 

51 

101 

501 

Greater 

1  n 
Corcoran 

than 
50 

to 
100 

to 
500 

to 
1,000 

1 

than 
,000 

Less  than 

or  equal 
to  50... 

0 

2 

0 

0 

0 

1 

51  to 

100 

0 

3 

0 

2 

0 

0 

101  to 

500 

6 

14 

5 

9 

1 

0 

501  to 

1,000... 

lilt 

38 

16 

2 

0 

2 

Greater 

than 

1,000... 

38 

31 

33 

40 

7 

3 
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Figure  11.      Areal  distribution  of  wells  perforated  only  in   the  confined  zone   with 
perforated  lengths  below   the  Corcoran  Clay  Member  of  the    Tulare  Formation. 


22     Distribution  of  Wells,   Western   San  Joaquin  Valley,    California 


TABLE  9. — Wells  perforated  only  in   the  confined  zone  with  perforated  lengths 
below   the  Corcoran   Clay  Member  of  the   Tulare  Formation 


11S11E32P01 
1 1  S1 1 £34001 
11S12E07E02 
12S11E10001 


13S13E20N01 
13S13E20001 
13S13E26N03 
13S13E28M01 


HS13E13E02 
nS13E13C01 
1«13E17E01 
US13E18E01 


HSUE30E03 
HSnE30K01 
USHE31G02 
1'tSTiE33E02 


15SUE06M01 
15STfE07N01 
15S1'>E08L01 
ISSTfEIONOl 


16S15E27N02 
16S15E29J02 
16S15E29N01 
16S15E31J01 


12S11E12D01 
12S11E12H01 
12S11E13D02 
12S11EHA01 

12S11E17002 
12S11E23R02 
12S11E25001 
12511  E3'fC03 


13S13E30R01 
13S13E31D01 
13S13E32N03 
13S13E33N02 

13S13E36N01 
13SUE07N01 
13SHE10001 
13SUE17N0'* 


TfSnEISNOI 
HS13E18N02 
1'fS13E18001 
HS13E19N02 

US13E19R01 
nS13E20L01 
14S13E21D01 
HS13E22A01 


USHE36N02 
US15E18E01 
US15E18E02 
HS15E18N01 

HS15E19N01 
US15E20N01 
1'fS15E30M01 
nS15E32N02 


15S1'fE12E01 
15SHE15B01 
15SUE15D01 
15S1'fE18A01 

ISSUEISFOI 
15SHE18002 
15S1'fE19E01 
15SHE21E01 


16S15E31L01 
16S15E31R01 
16S15E32001 
16S15E33J01 

16S15E3'tN0<f 
16S15E35E02 
16S15E35002 
16S16E02M01 


12S11E36001 
12S12E08R01 
12S12E16H05 
12S12E16H06 

12S12E18D01 
12S12E19N01 
12S12E21E01 
12S12E31M01 

12S12E31N01 
12S12E31N02 
13S12E02D01 
13S12E05N01 


13S14E31E01 
13SHE35002 
13S15E35D03 
HS12E01E01 

HS12E02N01 
US12E02N02 
nS12E02R01 
HS12E03M01 

14S12E03N01 
1'fS12E11F01 
HS12E11F02 
nS12E12H01 


HS13E22001 
HS13E23E01 
1'fS13E2'fN0'> 
1'fS13E25E01 

1'fS13E25N01 
US13E26D01 
US13E26E02 
US13E26M01 

1'fS13E26M02 
US13E26N02 
US13E26P01 
HS13E28D01 


15S12E01B01 
15S12E01E01 
15S12E01H01 
15S12E01N02 

15S12E01R01 
15S12E02C01 
15S12E12E01 
15S12E12001 

15S12E12002 
15S13E01D01 
15S13E02N02 
15S13E03N02 


15S1'fE28001 
ISSUESitEOI 
15SUE35B01 
15SHE36002 

15S15E12C01 
15S15E18E02 
15S15E20M01 
15S15E3't001 

15S16E07C01 
15S16E07002 
15S16E08E01 
15S16E29N01 


16S16E20R01 
16S17E21C01 
17S15E01P01 
17S15E02N01 

17S15E0'tE01 
17S15E05A01 
17S15E10D01 
17S15E10N01 

17S15E13N01 
17S15EHD01 
17S15EHE01 
17S15E21R01 


13S12E06P01 
13S12E07B01 
13S12E09N01 
13S12E09001 


1'fS12E12N01 
1'fS12E13N01 
HS12EUD01 
1'»S12EUF01 


1'tS13E28J01 
1'tS13E28M01 
HS13E30N01 
US13E32D01 


15S13E0'tE02 
ISSnEdPOl 
15S13E06J01 
15S13E07M01 


15S16E31N02 
15S17E28K01 
15S17E30F01 
15S17E30P01 


17S15E22A01 
17S15E22E01 
17S15E23H01 
17S15E23J01 


13S12E10N01 
13S12E10001 
13S12E10R01 
13S12E11R01 

13S12E13N01 
13S12E15N01 
13S12E20D01 
13S12E22001 


HS12E23A01 
1'fS12E23P01 
HS12E2'tN01 
1'fS12E25A01 

US12E25D01 
US12E25E01 
1'fS12E25001 
US12E25002 


1'tS13E33E01 
HS13E3'fN01 
1'iS13E35E02 
US13E35N02 

nS1'fE02P01 
US1'fE09E02 
USUE09E0'f 
USUE09M01 


15S13E07N01 
15S13E08E01 
15S13E08N02 
15S13E09E02 

15S13E09N02 
15S13E10F01 
15S13E10M01 
15S13E10N01 


15S17E33E01 
15S17E33001 
15S17E3'iE01 
15S17E3'fL01 

15S17E3'fL02 
16SHE03H01 
16SHE12K01 
16SUEUF01 


17S15E23N02 
17S15E26C01 
17S15E26H01 
17S15E26L01 

17S15E27B01 
17S15E27K01 
17S15E27002 
17S15E33E02 


13S12E2'fN01 
13S12E2ifN02 
13S12E26H01 
13S12E26N01 

13S12E26001 
13S12E27N01 
13S12E30N01 
13S12E33C01 

13S12E35D01 
13S12E35N01 
13S12E35N02 
13S13E06P01 

13S13E06P02 
13S13E07M01 
13S13E16E02 
13S13E16R01 


US12E35H01 
1'fS12E35J01 
TfSUESSKOI 
HS12E35001 

1'fS12E36M01 
1'fS13E0'*P01 

usnEoepoi 

HS13E06P02 

HS13E07A01 
1'fS13E07N02 
HS13E07R01 
USnEIIDOff 

IWISEIIDOe 
USnEIIROI 
HS13E12N02 
US13E12P01 


HSUE09001 
USUE10N01 
USUE10N04 
US14E12N01 

USUEISNOI 
HSUE17002 
HSHE18N02 
1'tS1'*E20P01 

1'fSHE22E01 
1'fSHE23E01 
HS1'fE2ifD01 
1'fSHE2'fE01 

1'fSUE2'fE02 
USUE26D01 
HSUE26N01 
14S1'fE27D01 


15S13E11D02 
15S13E12M01 
15S13E13B01 
15S13E13G01 

15S13EUD01 
15S13EUL01 
ISSISEUMOI 
15S13E15F01 

15S13E18R01 
15S13E20C01 
15S13E22M01 
15S13E22P01 

15S13E23H01 
15S13E2'»N01 
15S13E25M01 
15S13E26002 


16ST»E17H01 
16SHE22K01 
16SUE23P01 
16SUE2'iB01 

16S1'fE27P01 
16S15E06P01 
16S15E09E01 
16S15E09002 

16S15E17E01 
16S15E17M01 
16S15E17N02 
16S15E18M01 

16S15E19R01 
16S15E20C03 
16S15E22D01 
16S15E23N01 


17S15E33N01 
17S15E3'»D01 
17S15E3'tN01 
17S15E35J01 

17S15E35N01 
17S15E35001 
17S15E35R01 
17S15E36B01 

17S15E36K01 
17S15E36001 
17S15E36002 
17S16E0'*R01 

17S16E05K01 
17S16E18E01 
17S16E18002 
17S16E19N01 
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TABLE  9. — Wells  perforated  only  in   the  confined  zone   with  perforated  lengths 
below   the  Corcoran   Clay  Member  of  the    Tulare  Formation  —  Continued 


17S16E22E01 
17S16E26N01 
17S16E28F01 
17S16E28N02 

17S16E29N01 
17S16E30A05 
17S16E30A06 
17S16E30E01 

17S16E30N01 
17S16E32D01 
17S16E33N01 
17S17E26E03 

17S17E28001 
17S17E31002 
17S18E21P01 
18S15E01N02 
18S15E02N02 


18S16E02N01 
18S16E06D01 
18S16E06M01 
18S16E08N01 

18S16EUN02 
18S16El'tR02 
18S16E21B01 
18S16E22C01 

18S16E22002 
18S16E2'(H02 
18S16E24N01 
18S16E2'tP01 

18S16E2't001 
18S16E2't002 
18S16E25N01 
18S16E25R01 
18S16E26E01 


18S16E26F03 
18S16E32N01 
18S16E33A01 
18S17E07N0'f 

18S17E11N02 
18S17E15M01 
18S17E18001 
18S17E19F01 

18S17E19N01 
18S17E21E01 
18S17E28D01 
18S17E30C01 

18S17E30P02 
18S17E31001 
18S17E32L01 
18S17E32P01 
18S18E27001 


18S18E31N02 
18S19E20P01 
18S19E22M02 
18S19E31G01 

18S19E31C02 
19S17E03N02 
19S17E06A02 
19S17E07L01 

19S17E07P01 
19S17E13E01 
19S17EHG01 
19S17E15E01 

19S17E16M01 
19S17E17N02 
19S17E17P01 
19S17E22A01 
19S17E22J03 


19S17E35P01 
19S18E11N01 
19S18E15M01 
19S18E16N02 

19S18E18N03 
19S18E23D02 
19S18E2'tM01 
19S18E36N01 

19S19E21C01 
19S19E21E01 
19S19E31D01 
19S19E31N01 

20S18E11002 
2OS18En003 
20S18E12E01 
20S18E28E02 
20S18E29N03 


20S18E33E02 
20S18E35E01 
20S19E05D01 
20S19E06D01 

20S19E07N01 
20S19E19B01 
20S19E35M01 
21S18E02D02 

21S18E02D03 
21S18E11D02 
21S18E12D01 
21S18E13D01 

21S19E02B01 


WELLS   WITH   WATER    LEVELS 

REPRESENTATIVE   OF   THE 

SEMICONFINED    ZONE 

A  contour  map  of  water-table  alti- 
tude is  helpful  for  characterizing  the 
flow  system  of  the  semiconfined  zone. 
The  presence  of  a  downward  hydraulic 
head  gradient  in  the  study  area  necessi- 
tates care  in  selecting  wells  indicative 
of  the  water  table.  Well  depths  and 
1984  water-level  measurements  were 
examined  to  determine  which  wells  could 
be  used  to  construct  a  water-table  map. 
Most  of  these  wells  have  water-level 
measurements  recorded  since  1967.  In 
general,  the  shallowest  wells  available 
were  used  as  indicators  of  the  water 
table.  Where  the  water  table  is  less 
than     20     feet     deep,     20-foot     and     shal- 


lower wells  were  used.  Further  upslope 
toward  the  Coast  Ranges,  where  the 
water  table  is  deeper,  wells  are  more 
sparsely  distributed.  In  these  areas, 
most  of  the  wells  completed  in  the  semi- 
confined  zone  were  used.  Where  the  Cor- 
coran is  not  present,  wells  less  than 
1,000  feet  deep  were  used  to  help  define 
the  water  table.  Dry  wells  also  were 
helpful  in  determining  the  upper  limit  of 
the  water  table.  Table  10  lists  wells 
with  water  levels  indicative  of  the  water 
table  and  dry  wells,  which  help  define 
the  water  table.  Figure  12  shows  the 
areal  distribution  of  these  wells.  Figure 
13  shows  the  wells  perforated  below  the 
water  table  and  above  the  Corcoran  Clay 
Member  of  the  Tulare  Formation.  These 
wells  are  indicative  of  water  levels  in 
the  semiconfined  zone  below  the  water 
table  and  are  listed   in   table   11. 
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Figure  12.      Areal  distribution  of  wells   with   water  levels  indicative  of  the  water 
table  and  dry   wells   which   help  define  the  water  table. 
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Figure  13.      Areal  distribution  of  wells  perforated  below  the  water  table  and  above 
the  Corcoran   Clay  Member  of  the    Tulare  Formation. 
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TABLE  10. — Wells  with   water  levels  indicative  of  the  water  table  and  dry  wells 

which  help  define  the  water  table 

[*,   dry  wells] 


10S10E31D01 

10S10E31C02 

*10S10E31001 

10S10E31002 

♦11S10E08C02 
*11S10E08C01 
*11S10E09M01 
*11S10E09M02 


*12S11E20R01 

*12S11E20R02 

12S11E23E01 

*12S11E28G01 

*12S11E28C02 
*12S11E3fC01 
*12S11E3'»C02 
*12SllE3'tR02 


13S12E20R01 

13S12E28D01 

*13S12E33BOt 

*13S12E3'fN01 

13S12E3'fP02 
13S12E36D03 
13S13E06R01 
13S13E07R01 


13S15E19M03 

13S15E31R02 

13S15E32D01 

*US12E02001 

*US12E11B01 

*1'fS12E12G02 

US12E12J01 

1'fS12E26H01 


USUE28A01 
US1'fE28D01 
1'fSUE33N02 
HS15E05E01 

HS15E05E02 
TfSISEOSEOS 
TfSISEOTDOl 
HS15E08R01 


15SHE17A01 
15SUE17D01 
ISSUEiyROI 
15SUE19D01 

15S1'fE19L01 
15SUE19M01 
15SUE20R01 
15SUE22D01 


*11S10E09M03 
♦11S10E16R01 
*11S10E16R02 
*11S10E21A02 


*12S11E35N03 
12S12E06D01 
12S12E08A01 
12S12E16A01 


13S13E09D02 
13S13E11N03 
13S13E12R02 
13S13E13D01 


*US13E07001 
*l'fS13EO70O2 
*HS13E12R01 
*1'fS13E16N02 


US15E17N01 
HS15E17002 
US15E18A01 
1'iS15E18N02 


15S1'fE23D04 
15SUE23N01 
15SUE2'»D02 
15SUE25D01 


*11S10E22C01 
*11S10E22H02 
♦11S10E22J01 
*11S10E23N01 


12S12E19E01 

12S12E25N02 

*12S12E30N02 

12S12E3'tD03 


13S13E13R02 
13S13EHN03 
13S13E15N02 
13S13E16N02 


*US13E16N03 
♦HSnEIGNO'f 
♦US13E17E03 
*nS13E17K01 


HS15E19R02 
US15E20R01 
14S15E21D01 
US15E28C01 


15SUE25N01 
15SHE28A01 
15S1'fE29D01 
15SUE29R02 


11S10E25M01 

11S10E25N01 

*11S10E26F01 

11S10E26H01 


12S13E02A01 
12S13E02R01 

nsnEOftRoe 

12S13E05C05 


*13S13E22N02 
13S13E22R01 
13S13E2'iN01 
13S13E30D01 


*HS13E17K02 

*1'*S13E21G01 

*1'fS13E21G02 

1'fS13E2'fN02 


1'iS15E28001 
14S15E28R01 
US15E32A02 
USISES^fPOl 


15SHE30C02 
15S1'fE30K02 
15SHE30L01 
15S1'fE31B02 


11S10E26J01 
11S10E36C02 
11S10E36D01 
11S10E36E01 


12S13E05C06 
12S13E05H05 
12S13E05H06 
12S13E08A05 


*13S13E32R01 
13S13E35R01 
13S13E36D01 
13S13E36E01 


*HS13E27C01 

*US13E27D01 

*HS13E30N02 

US13E30N04 


nS15E3'f001 
US15E35N02 
HS15E35R02 
HS16E32A03 


15S1'fE31G01 

*15SUE31H0'* 

15SHE32D01 

15S1'tE33N01 


11S10E36F01 
11S10E36L02 
11S10E36M01 
11S10E36001 

nS12E10D01 
11S12E22N05 
11S12E25005 
11S12E25006 

11S12E26G05 
11S12E26G06 
11S12E27C05 
11S12E27N01 

11S12E32R01 
11S13E09D01 
11S13E31D05 
11S13E31K05 

nS13E31K06 

11S13E33R02 

11S13E36R01 

*12S10E01G01 

♦12S10E01G02 

*12S10E01C03 

*12S10E01H01 

12S11E06N02 


12S13E10C05 
12S13E13D02 
12S13E20N01 
12S13E32R01 

12S1'fE0'«N01 
12SUE07K01 
12SUE20K01 
12S1'fE20R01 

12SHE29D02 
12SUE30J05 
12SHE32J01 
12SHE32J03 

12SUE330O1 
*13S11E02K01 
♦13S11E02K02 
*13S11E12D01 

*13S11E12D02 
13S12EO'iA01 
13S12E05R02 
13S12E08J01 

*13S12E17D01 
13S12E17N02 
13S12E18E02 
13S12E18G01 


13S13E36M02 
13S13E36N0'f 
13S13E36R01 
13SHE03C01 

13SUE03L01 
13SHE03M02 
13SUE03M04 
ISSTtEOifOOl 

13SUE07N05 
13S1'fE07R01 
13SHE12L01 
13S14E15R01 

13S1'fE18R01 
13SUE20N01 
13SUE21N06 
13S1'*E25J0'f 

13SUE25N03 
13S1'fE27D02 
13SUE27N01 
13S1'*E27R01 

13SHE32D01 
nSHESSDOl 
13SUE3'fN03 
ISSTfES^ROI 


USTfEOIDW 
USHE02R01 
USHE03N04 
HSUE03R01 

USHE05A01 
TfSHEOSAOS 
USTiE05D02 
USUE05R01 

US1'»E06N03 
USUE07A01 
HSUE07N02 
USTtEIIROI 

1'fSHE13A02 
USHEUNOI 
USUE15A01 
HSUE15D01 

HS14E15N03 
HS1'fE17N01 
US1'fE18A01 
US1'iE18R02 

nSHE20N02 
HSHE21D01 
1'»SUE2'*N06 
T»SHE2'fR01 


15S12E02A01 

15S12E03R01 

15S12E11H01 

*15S12E2'tR01 

*15S13E03A01 
15S13E11B01 
15S13E11C01 
15S13E11D03 

15S13E12N03 

*15S13E12R01 

15S13E13J01 

15S13E13R01 

15S13E20D01 
15S13E32F01 
15SUE01D02 
ISSHEOINOS 

ISSTiEOIROI 
15S1'fE03A01 
15SHE(WN01 
ISSHEOifROI 

15SUE05D01 
ISSTiEOeDOS 
15SUE06R01 
15S1'iE11D03 


15SUE3M01 
15SUE34D01 
15SHE3'f001 
15SUE36A01 

15S15E01C01 
15S15E03A01 
15S15E03002 
ISSISEOifAOl 

15S15E05A01 

*15S15E05D01 

15S15E06D01 

15S15E07R01 

15S15E08D01 
*15S15E10A01 
*15S15E10D02 

15S15E10J01 

*15S15E13N01 

*15S15E13R01 

15S15EUB01 

15S15EUL01 

15S15E15D01 
15S15E16R01 
15S15E17A03 
15S15E18N03 


*12SnE07C01 

*12SnE07C02 

12S11E17C01 

12S11E170O1 


*13S12E18R01 
13S12E20F02 
13S12E20C02 
13S12E20J01 


13S15E18M01 
13S15E19L01 
13S15E19M01 
13S15E19M02 


US1'iE25N01 
HSUE26D02 
HSUE26N02 
USHE27N02 


15S1'iE12R01 
ISSHEnOOl 
15SUE1'fD02 
15S14E16A01 


15S15E18R01 
15S15E19N05 
15S15E21D01 
15S15E21N03 
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TABLE  10. — Wells  with   water  levels  indicative  of  the  water  table  and  dry  wells 
which  help  define  the  water  table — Continued 


15S15E22N02 
♦15S15E23A02 

15S15E23D02 
*15S15E2'tB01 


16S15E09R01 

*16S15E12N02 

16S15E13A02 

16S15EHD01 


♦leSISESONOff 

*16S16E32D01 

*16S16E32N02 

16S16E33D01 


17S16E28D01 

17S16E29N02 

*17S16E31M01 

*17S16E33D01 


18S16E03A01 

*18S16E0'tD01 

18S16E05E01 

18S16E05R02 


18S17E2'tN0'f 

18S17E25A01 

18S17E35R02 

*18S18E02D01 


15S15E2'tN02 
15S15E2'fR02 
15S15E26D02 
15S15E26R02 


16S15E17N03 

16S15E18A01 

*16S15E18P01 

16S15E19H02 


16S16E3'fN03 
16S16E35A01 
16S16E35N01 
16S16E36N01 


17S16E33R03 
17S17E03N01 
17S17E0'fA01 
17S17E05N02 


18S16E06F01 
18S16E07A02 
18S16E07001 
18S16E08D02 


18S18E02R02 
18S18E03R01 
18S18E0'fN01 
18S18E05N0'f 


15S15E27N02 
15S15E27R01 
15S15E28N01 
15S15E29N03 


*16S15E20A01 
16S15E20E01 
16S15E20M01 
16S15E21A01 


*16S17E16N01 

16S17E19R01 

*16S17E20D01 

*16S17E21A01 


17S17E05R01 
17S17E06C01 
17S17E06N02 
17S17E07N01 


18S16E08M01 
18S16E08M02 
18S16E08N02 
18S16E09N02 


18S18E07D01 
18S18E12R01 
18S18E13E01 
18S18EHD01 


15S15E32N01 
15S15E33N01 
15S15E33R01 
15S15E35N02 


16S15E21N01 

16S15E21R01 

*16S15E23D01 

*16S15E2'tD01 


16S17E27N02 

16S17E28N03 

*16S17E29N01 

♦17SHE02D01 


17S17E08N01 
17S17E09N01 
17S17E09R01 
17S17E11N01 


18S16E10D01 
18S16E10N01 
18S16E12N01 
18S16E12R01 


18S18EUN01 
18S18E16N01 
18S18E17D01 
18S18E17N01 


15S15E35001 
15S15E36001 
15S16E05E02 
15S16E13J01 


*16S15E2'fN0't 

*16S15E27A01 

*16S15E28M02 

16S15E29B01 


*17S1'tE1'fA02 

*17S15E02E01 

17S15E06P02 

17S15E07D01 


17S17E11R02 
17S17E15R01 
17S17E16R01 
17S17E20A01 


18S16E15R02 
18S16E16R01 
18S16E17D01 
18S16E17F01 


*18S18E18D01 

*18S18E18N02 

18S18E20N01 

18S18E21N02 


15S16E26A01 

15S16E30R01 

ISSieESINOif 

*15S16E32R02 


•16S15E29F01 

*16S15E32A0'f 

16S15E33K01 

16S15E33L01 


*17S15E11B01 
*17S15E11C01 
*17S15E13N0'> 
*17S15E13N06 


17S17E21P01 
17S17E21R02 
17S17E23H01 
17S17E2'fD01 


*18S16E17N03 
18S16E17001 
18S16E20A01 

*18S16E20E02 


18S18E21R01 
18S18E22D03 
18S18E23N02 
18S18E2'fD02 


15S16E33D01 
16SHE01A01 
16SUE01R01 
16S1'iE02A01 


16S16E01R01 
*16S16E02N01 

16S16E03E01 
*16S16E03N01 


*17S15EHA02 

17S15E17R01 

*17S15E2<tP02 

*17S15E25J01 


17S17E25A01 
17S17E26A01 
17S17E27A01 
17S17E27N01 


18S16E20H01 
18S16E20R02 
18S16E22N03 
18S16E23A03 


18S18E24N02 
18S18E25N01 
18S18E26N03 
18S18E27N0'f 


16S1'fE02N02 
16SHE02R01 
16SUE03E02 
16SUE03N01 


*16S16E03N02 
16S16E05R03 
16S16E10N02 

*16S16E12R01 


17S16E02N02 
17S16E02R01 
17S16E0'fD01 
17S16E0'tN03 


17S17E27R0'f 
17S17E28R03 
17S17E29N03 
17S17E30A01 


*18S16E2'fA01 
18S16E28M01 
18S16E33A06 

*18S16E33G01 


18S18E30N02 
18S18E32E02 
18S18E32R01 
18S18E34N01 


16SHE0'tN02 
*16SUE05C02 
♦16SHE05D01 

16SHE09A02 


16S16E13D01 
*16S16E13R01 

16S16EHN02 
*16S16E15A02 


*17S16E06R01 
17S16E09A01 
17S16E09R03 
17S16E11N0'f 


17S17E31N02 
17S17E33R01 
17S17E3'fR01 
17S17E35A01 


18S16E34H01 

*18S16E35J01 

18S17E01N01 

18S17E03N03 


18S18E35N05 
18S18E36N05 
18S18E36R01 
18S19E16N02 


16SHE09H02 
16S1'fE09N01 
16SHE10J01 
16SUE10K02 


16S16E15N03 
16S16E17A01 
16S16E17D01 
16S16E19A01 


17S16E12N02 
17S16E13N03 
17S16E1'iN01 
17S16E16D01 


17S17E36N01 
*17S17E36R01 
*17S18E19A01 

17S18E26N01 


18S17E05R01 
18S17E06N01 
18S17E07A01 
18S17E07R01 


18S19E17D01 
18S19E19C01 
18S19E19R01 
18S19E32H01 


leSHEllROI 
*16SHE12N01 
*16SHE13F01 

16SUE13G02 


*16S16E19001 
16S16E20N02 
16S16E21D01 
16S16E21N01 


17S16E16N02 

17S16E16R01 

*17S16E17D02 

17S16E20N01 


17S18E28N02 

17S18E28R02 

*17S18E29D01 

17S18E30N01 


18S17E09N02 

18S17E10N01 

18S17E11P01 

*18S17E13N03 


18S19E33J02 
18S19E35J01 
18S20E09M01 
18S20E10M01 


16S15E01N01 

*16S15E01R01 

16S15E02N0'f 

16S15E0'tN01 

leSISEdROI 
16S15E05N01 
16S15E07N02 
16S15E09N02 


16S16E22N01 

*16S16E23A01 

16S16E23N02 

16S16E23R01 

16S16E2'fR01 

16S16E27N01 

16S16E27R01 

*16S16E30D01 


17S16E21R01 
17S16E22001 
17S16E23R01 
17S16E2'fR02 

17S16E25R01 
17S16E26N03 
17S16E26R01 
17S16E27N02 


17S18E30R01 
*17S18E31N03 
*17S18E32N01 

17S18E33N02 

17S18E33R01 

*18S15E0'fN02 

18S16E01N03 

18S16E02A01 


*18S17EHA01 
18S17EHN03 
18S17E15N05 
18S17E16N01 

18S17E20D01 

18S17E21N01 

*18S17E21R01 

18S17E22R01 


18S20E19N01 
*19S16E01A02 
*19S16E05H01 
*19S16E05H02 

*19S16E05H03 
*19S16E05P01 
•19S16E17C02 
*19S16E20B01 
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TABLE   10. — Wells   with   water  levels   indicative  of  the  water  table  and  dry   wells 
which   help  define   the   water  table-- Continued 


*19S16E29B01 
*19S16E32A01 
*19S16E32R01 
*19S17E06K01 

*19S17E08D02 
*19S17E15N02 
*19S17E16B01 
*19S17E16C01 

*19S17E22H01 

*19S17E22H02 

*19S17E23001 

19S17E30A02 

*19S17E36H02 
19S18E02N01 
19S18E02R01 

•igSIBEOitNOI 

*19S18E05N02 

19S18E10D01 

*19S18E10N02 

*19S18E12N01 

19S18E14R01 
19S18E2't001 
19S18E33M02 
19S19E02N01 
19S19E07N01 


19S19E09A01 
19S19E10N01 
19S19E11B01 
19S19EnJ01 

19S19E16N0't 

19S19E17A01 

*19S19E18N0't 

19S19E19A01 

19S19E19D01 
19S19E20N01 
19S19E21A01 
19S19E21N02 

19S19E23A01 
19S19E26H03 
19S19E26003 
19S19E27D02 

19S19E30N01 
19S19E31N02 
19S19E31R01 
19S19E32D01 

19S19E33D01 

19S19E3'iD02 

19S19E35R02 

*20S16E09D01 

*20S16E09D02 


*20S16E09L01 

20S16E10H03 

*20S16E15M01 

*20S16E15N01 

*20S16E22K01 

*2OS16E220O1 
*20S16E26L01 
*20S16E35H01 

20S17EnN03 

20S17E32R01 

•20S18E01N01 

20S18E01R01 

*20S18E02A01 
*20S18E06D03 
*20S18E07B01 
*20S18E07001 

*20S18E07R01 
*20S18E11N02 
*20S18E13D01 
*20S18E13N01 

*20S18E13R02 

*20S18E18R01 
20S18E2'tR01 

*20S18E30J02 
20S18E3'*N01 


20S18E34R01 

20S18E35D03 

20S18E35001 

*20S18E36D04 

20S19E03D01 
20S19E05N01 
20S19E08A01 
20S19EnA03 

20S19E11N02 
20S19E15H01 
20S19E16A01 
20S19E16D02 

20S19E17D01 
20S19E18R01 
20S19E20001 
20S19E21A01 

20S19E23N01 
20S19E25D02 
20S19E28A01 
20S19E29D01 

*20S19E31001 
20S19E32R01 
20S19E33A01 
20S19E33R01 
20S19E35B01 


21S17E06N01 
*21S18E01A01 
*21S18E02N01 
*21S18E06J01 

*21S18E07C01 

*21S18E10D03 

21S18E10R01 

21S18E12D03 

21S18E12N01 
21S18E13A01 
21S18E13N01 
21S18E15R01 

*21S18E18C02 
*21S18E18J02 
*21S18E20J01 
*21S18E20K01 

*21S18E21R01 

*21S18E22D01 

21S18E2'«N03 

*21S18E27N03 

*21S18E28B01 
*21S18E28B02 
*21S18E3itA01 
*21S18E3'tK02 
*21S19E02C01 


*21S19E0'»M02 
21S19E06N01 
21S19E06R02 
21S19E07R01 

21S19E09N01 
21S19E10N01 
21S19E11D01 
21S19E17N01 

21S19E18N02 
21S19E21N01 
21S19E30N01 
21S19E31001 

22S18E01B01 
*22S18E01D02 
*22S18E01P01 
*22S18E02E01 

*22S18EnB01 
*22S18E11B02 
*22S18E12P03 
*22S18E12R02 

*22S18E13F01 
*22S18E13K01 


TABLE   11. — Wells  perforated  below   the   water  table  and  above  the  Corcoran   Clay 

Member  of  the    Tulare  Formation 


10S1OE31DO2 
nS10E36L01 
12S12E03R02 
12S12E25R02 
12S13E07N01 
12S13E19K01 
13S12E17N01 
13S12E18E01 


13S12E20D02 
13S12E20R02 
13S12E28D02 
13SUE17N02 
1'*S15E08C0't 
TtS15E28L0't 
15S13E11B02 
15S13E12N04 


15SUE30C01 
15ST*E31B01 
15S1'iE32N03 
15S15E09D03 
15S15E18N01 
15S15E18N02 
16SHE0'(N03 
16SUE04N0'* 


leSI'tEO'tPOl 
16STtE13C01 
16SUE13C0't 
16S15E18P02 
16S15E18P03 
16S15E19H01 
16S15E32A03 
16S16E03E02 


16S16E05R02 
18S16E20R01 
18S16E23A01 
18S16E23A02 
18S16E33A02 
18S16E33A03 
18S16E33A0't 
18S16E33A05 


18S16E3'tH02 
18S17E05N0'i 
18S18E30J02 
18S19E07P02 
19S19E15A02 
20S19E29R01 
21S19E02A02 
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SUMMARY 

A  large  number  of  wells  have  been 
drilled  in  the  San  Joaquin  Valley  to  sup- 
ply water  for  agriculture  and  to  monitor 
water  levels.  Information  from  5,860  of 
these  wells  was  collected  from  several 
sources  and  compiled  into  a  common  data 
base.  These  wells  were  then  organized 
into  categories  by  comparing  the  location 
of  the  perforated  lengths  with  the  loca- 
tion of  the  hydrogeologic  units.  These 
categories  were  used  to  characterize  the 
nature  and  distribution  of  the  wells  and 
to  compile  information  on  the  ground- 
water flow  system.  In  addition,  a  com- 
puterized system  for  storing  and  retriev- 
ing well   information  was  developed. 

Because  of  the  varying  degree  of 
detail  and  quality  of  the  data,  only 
2,547  wells  had  sufficient  information 
for  classification  into  four  categories 
based  on  the  hydrogeology:  1,114  wells 
are  perforated  in  the  semiconfined  zone 
at  depths  less  than  or  equal  to  50  feet, 
490  wells  are  perforated  in  the  semi- 
confined  zone  at  depths  greater  than  50 
feet,  533  wells  are  perforated  in  the 
semiconfined  and  confined  zones,  and  410 
wells  are  perforated  only  in  the  confined 
zone.  Additionally,  wells  perforated  in 
the  semiconfined  zone  at  depths  greater 
than  50  feet  were  classified  by  the  type 
of  deposits  they  were  perforated  in 
(Coast   Range   alluvium   or   Sierran   sand). 

Each  hydrogeologically  based  cate- 
gory is  represented  by  a  map  showing 
the  location  of  wells  in  the  category  and 
by  a  list  of  those  wells.  The  maps 
illustrate  the  area!  distribution  of  the 
wells  in  a  category.  The  lists  allow  the 
user  to  obtain  more  information  from  the 
data  base  with  the  use  of  the  programs 
provided.  This  information  can  be  used 
as  a  starting  point  for  further  investi- 
gations in  the  San  Joaquin  Valley. 


Wells  perforated  in  the  semiconfined 
zone  at  depths  less  than  or  equal  to  20 
feet  are  evenly  distributed  over  the  area 
less  than  20  feet  from  water.  They  gen- 
erally are  used  as  observation  wells  to 
monitor  the  shallow  water  table.  The 
50-foot  wells  are  used  to  monitor  water 
levels  near  the  California  Aqueduct. 

Most  wells  perforated  in  the  semicon- 
fined zone  at  depths  greater  than  50  feet 
are  perforated  in  the  Sierran  sand.  A 
few  wells  are  perforated  in  the  Coast 
Range  alluvium,  but  the  coverage  is 
sparse.  The  concentration  of  wells  per- 
forated in  the  Sierran  sand  indicates 
that  there  is  a  greater  tendency  to  use 
Sierran  sand  than  the  Coast  Range  allu- 
vium as  a  source  of  water.  Moreover, 
a  large  percentage  of  the  wells  perfor- 
ated in  the  Coast  Range  alluvium  are 
part  of  the  California  Aqueduct  monitor- 
ing  system  and  are  not  production  wells. 

Most  of  the  wells  perforated  in  the 
semiconfined  and  confined  zones  are 
upslope  of  the  valley  trough  in  areas 
where  the  Sierran  sand  is  absent. 
These  wells  have  an  average  perforated 
length  of  987  feet  below  the  Corcoran 
and  an  average  perforated  length  of  132 
feet  above  the  Corcoran.  Wells  in  or 
near  the  valley  trough  where  the  Sierran 
sand  is  present  have  a  shorter  average 
perforated  length  below  the  Corcoran 
(555  feet)  and  a  slightly  longer  average 
perforated  length  above  the  Corcoran 
(162  feet).  This  indicates  that  wells 
which  are  able  to  access  the  Sierran 
sand  do  not  need  to  be  drilled  deep  into 
the  confined  zone  to  obtain  an  adequate 
yield  of  water. 

Similarly,  wells  perforated  only  in 
the  confined  zone  are  predominantly 
upslope  of  the  valley  trough.  These 
wells  also  reflect  the  influence  of  the 
presence     or     absence     of     Sierran     sand 
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above  the  Corcoran,  Wells  in  the  valley 
trough  have  an  average  perforated  length 
of  628  feet,  and  wells  upslope  of  the 
valley  trough  have  a  longer  average 
perforated   length  of  987  feet. 

Wells  perforated  only  in  the  con- 
fined zone  also  are  concentrated  near  the 
creeks.  This  indicates  a  tendency  for 
locating  wells  in  the  coarser  grained 
sediments  of  the  upper-fan  areas,  rather 
than  in  the  finer  grained  sediments  of 
the  interfan  areas. 
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APPENDIX— SAMPLE   DATA  AND   PROGRAM   DOCUMENTATION 

The  following  Fortran  programs  were  designed  to  retrieve  well  records  from  the 
water-level  data  base.  Data_Recovery ,  which  is  a  compilation  of  many  of  the  smaller 
programs  described  later,  is  an  interactive  program  which  allows  the  user  to  query 
the  data  base  for  specific  information.  Data_Recovery  accepts  as  input  any  file  that 
is  in  a  "standard  format."  Methods  of  recovering  data  from  the  input  file  include: 
(1)  interactive  entry  of  specific  well  locations;  (2)  a  list-driven  search  using  an 
external      file     containing     well      locations;      (3)  recovering     wells     in     a     specified 

township/range;  and  (4)  a  search  of  the  entire  input  file.  Searches  can  be  further 
restricted  by  imposing  ranges  or  limits  on  the  dates  of  record  and/or  the  depth  of 
the  wells. 

Strip_Headers  accepts  any  subset  of  the  water-level  data  base  as  input,  and  creates 
a  listin"g  of  only  the  headers  without  the  water-level  entries.  The  list  of  headers 
has  many  uses,  including  its  role  as  input  to  Depth_Sort,  which  searches  through  the 
list  of  headers  and  produces  well  records  for  the  subset  of  wells  having  depths 
within  a  specified  range.  Strip_Loc  also  uses  the  output  from  Strip_Headers,  and 
converts  it  to  a  list  of  well  locations  (township,  range,  section,  quarter-quarter 
section,  and  well  number)  which  can  be  used  as  input  for  the  list-driven  search  in 
Data_Recovery. 

Date_Select  accepts  any  subset  of  the  water-level  data  base  as  input,  and  retrieves 
header  and  water-level  information  for  these  wells  that  have  a  measurement  on  a 
user-specified  date.  The  output  consists  of  one  line  per  successful  search, 
containing  the  location,  water  level  (on  the  specified  date),  and  depth  of  the  well. 
WL_Diff  compares  two  files  created  by  DateSelect,  and  calculates  the  differences 
between  the  water  levels. 
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Sample  Data   (in  "standard"   USER  format): 

12        3        4 
1234567890123456789012345678901234567890123456 

Q005M13S13E13D0110  6  N0016  83  0 

830110  020400203000880007801952  0 

830405  020400203000780006801962  0 

830706  020400203000700006001970  0 

831004  020400203000810007101959  0 

840117  020400203000860007601954  0 

840402  020400203000820007201958  0 

840702  020400203000620005201978  0 

841003  020400203000860007601954  0 

850102  020400203000870007701953  0 

850403  020400203000730006301967  0 

850708  020400203000650005501975  1 

The  first  line,  called  a  "header",  is  organized  as  follows: 

COLUMNS  DESCRIPTION 

1-5  Code  for  origin  of  data 

6-16  State  Well  Number 

37-40  Well  depth 

42-43  First  year  of  measurement 

44-45  Last  year  of  measurement  (if  discontinued) 

The  remaining  lines  are  organized  as  follows: 

COLUMNS  DESCRIPTION 

1-6  Date  of  measurement  (Year, Month, Day) 

11-14  Measuring  point  elevation 

16-19  Land  surface  elevation 

21-24  Depth-to-water  from  measuring  point 

26-29  Depth-to-water  from  land  surface 

30-33  Water  surface  elevation 

38  Flag  -  l=last  record 

Note:  There  are  implied  decimals  between  the  13th  and  14th,  18th  and  19th,  23rd 
and  24th,  28th  and  29th,  and  32nd  and  33rd  columns. 

If  the  digit  after  the  implied  decimal  is  not  a  number,  then  the  value  is  negative. 
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PROGRAM   DATARECOVERY 

C  S.P.PHILLIPS  05/87  This  program  is  an  interactive  data  retrieval   system 

C  designed  to  accept  data  in  "standard"  USBR  format,  and  output  that 

C  data  which  meets  the  user-specified  requirements  for  LOCATION,  DEPTH, 

C  and  DATE. 

C 

C  INPUT: 

C  Example  Input  (in  "standard"  USBR  format): 

C  12                  3                  4 

C  1234567890123456789012345678901234567890123456 

C  Q005M13S13E13D0110            6  N0016  83  0 

C  830110   020400203000880007801952    0 

C  830405   020400203000780006801962    0 

C  830706   020400203000700006001970    0 

C  831004   020400203000810007101959    0 

C  840117   020400203000860007601954    0 

C  840402   020400203000820007201958    0 

C  840702   020400203000620005201978    0 

C  841003   020400203000860007601954    0 

C  850102   020400203000870007701953    0 

C  850403   020400203000730006301967    0 

C  850708   020400203000650005501975    1 

C 

C  The  first  line,  called  a  "header",  is  organized  as  follows: 

C 

C  COLUMNS  DESCRIPTION 

C  1-5   Code  for  origin  of  data 

C  6-16   State  Well  Number 

C  37-40   Well  depth 

C  42-43   First  year  of  measurement 

C  44-45   Last  year  of  measurement  (if  discontinued) 

C 

C  The  remaining  lines  are  organized  as  follows: 

C 

C  COLUMNS  DESCRIPTION 

C  1-6    Date  of  measurement  (Year, Month, Day) 

C  11-14   Measuring  point  elevation 

C  16-19   Land  surface  elevation 

C  21-24   Depth-to-water  from  measuring  point 

C  26-29   Depth-to-water  from  land  surface 

C  30-33   Water  surface  elevation 

C  38    Flag  -  l=last  record 

C 

C  OUTPUT: 

C 

C  The  output  consists  of  well  records  that  satisfy  the  user-specified 

C  requirements,  which  are  defined  in  two  phases.  The  first  phase  involves 

C  the  geographic  bounds  of  the  search,  and  offers  the  following  options: 

C 

C  1)  Interactively  enter  specific  well  locations. 

C  2)  Use  list  of  well  locations  contained  in  an  external  file. 

C  3)  Search  a  specified  township/range. 

C  4)  Let  the  data  in  the  input  file  determine  the  geographic  bounds. 
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C  The  second  phase  allows  the  user  to  select  additional  criteria  for  a 

C  successful  search.  One  or  more  of  the  following  options  may  be  applied 

C  to  any  of  the  geographic  searches  chosen  in  the  first  phase: 

C 

C       1)  Search  for  well  within  a  specified  depth  range. 

C        2)  Search  for  well  records  within  a  specified  date  range. 

C        3)  Search  for  well  records  with  a  particular  date. 

C 

C       The  default  output  is  a  file  containing  sequential  well  records  for 

C  those  wells  satisfying  the  search  criteria.  The  user  has  the  option  of 

C  creating  a  separate  file  for  each  well. 

C 

r****  Rpnin  MAIN  oroaram  ****************************************************** 

COMMON  /OFILES/  OFILE.BDFILE 

COMMON  /INFILS/  INFILE 

COMMON  /FLAGS/  PASSFL ,SAVEFL,SEPFLG,SORTFL 

COMMON  /HDRS/  HEADER 

COMMON  /CHRS/  HLDATE, MONTHS, YEAR, YEARMO 

COMMON  /INTO/  DEEP, NUMMON( 15) ,NUMYR, SHALL 
C    Global  variables 

CHARACTER  HEADER*80,HLDATE*4,M0NTHS*120,SEPFLG*1,YEAR*30, 
+  YEARM0*30 

CHARACTER  PASSFL*!, SAVEFL*1,S0RTFL*1 

INTEGER  BDFILE, DEEP, SHALL, INFILE, NUMMON,NUMYR,OFILE 
C    Local  variables 

CHARACTER*!  0PTI0N(5) 

CHARACTER  ANSWER*!, BDFLNM*32, BLANK*!, INNAME*32,0UTNAM*32, TYPE*! 

INTEGER  MINDEX,MON,OPTNUM,TMON,YINDEX 
C 
C    Initialize  variables 

INFILE=30 

0FILE=3! 

BDFILE=5 

BLANK='  ' 
C    Initialize/reset  variables 
!0  CONTINUE 

DEEP=0 

SHALL=0 

HLDATE=' 

YEAR(!:2)='   ' 

YEARM0(1:2)='   ' 

OPTNUM=0 

NUMYR^O 

TMON=0 

SEPFLG='N' 
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Ask  series  of  questions  to 
WR1TE(1,300)  BLANK 


define  user  needs,  and  open  appropriate  files 


WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
WRITE(1,300) 
READ(1,300) 


'How  do  you  wish  to  recover  well  data? 
BLANK 

1) 
2) 
3) 

4)  Gather  data 
BLANK 
'ENTER  1, 
TYPE 


Enter  well  location(s)  from  the  terminal' 
Read  well  locations  from  a  file' 
Gather  data  from  specified  Township/Range' 
from  entire  input  file' 

2,  3,  or  4:' 


WRITE(1,300)  BLANK 

WRITE(1,300)  'Additional  options: 
20  CONTINUE 

0PTNUM=0PTNUM+1 

WRITE(1,300)  BLANK 

WRITE(1,300)  '     1) 

WRITE(1,300)  '     2) 

WRITE(1,300)  '     3) 

WRITE(1,300)  '     4) 

WRITE(1,300)  '     5) 

WRITE(1,300)  BLANK 

WRITE(1,300)  'ENTER 

READ(1,300)  OPTION(OPTNUM) 

IF(OPTION(OPTNUM).NE. '5')  THEN 
WRITE(1, 300) 'Would  you  like  to 
READ( 1,300)  ANSWER 
IF(ANSWER.EQ.'Y')  GOTO  20 

ENDIF 


Specify  depth  range' 
Specify  date  range' 
Specify  particular  date 
Specify  particular  date 
None' 


1,  2,  3,  4,  or  5: 


-  Year(s) 
■Year(s)  + 


only' 
Month(s) 


use  another  option  (Y/N)?' 


WRITE(1,300)  'Enter  the  name  of  the  INPUT  file  containing' 
WRITE(1,300)  '"standard"  raw  data' 
READ(1,300)  INNAME 
OPEN(INFILE,FILE=INNAME) 

WRITE(l,300)'Is  the  above  input  file  sorted  by  location  (Y/N)?' 
READ(1,300)  SORTFL 
IF(SORTFL.EQ.'Y')  THEN 
IF{TYPE.EQ.'l')  THEN 
WRITE(l,300)'Is  your  list  of  well  locations  sorted  (Y/N)?' 
READ(1,300)  SORTFL 
ELSE  IF(TYPE.EQ.'2')  THEN 

WRITE(l,300)'Is  the  file  containing  locations  sorted  (Y/N)?' 
READ(1,300)  SORTFL 
ELSE  IF(TYPE.EQ.  '3')  THEN 
WRITE( 1,300) ' Is  your  list  of  Township/Ranges  sorted  by' 
WRITE(1, 300) 'Township  and  Range,  respectively  (Y/N)?' 
READ( 1,300)  SORTFL 
ENDIF 
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ENDIF 

WRITE(1,300)  'Enter  the  name  of  the  OUTPUT  file:' 

READ( 1,300)  OUTNAM 

OPEN(OFILE,FILE=OUTNAM) 

WRITE(1,300) ' You  have  the  option  to  create  a  separate  file  for' 

WRITE(1, 300) 'each  set  of  well  data  that  passes  the  search' 

WRITE(1, 300) 'criteria  -  would  you  like  this  option  (Y/N)?' 

READ( 1,300)  ANSWER 

IF(ANSWER.EQ.'Y')  SEPFLG='Y' 

WRITE(1, 300) 'Would  you  like  to  save  a  file  of  headers/locations' 

WRITEd, 300) 'that  do  not  pass  the  search  criteria  (Y/N)?' 

READ( 1,300)  ANSWER 

IF(ANSWER.EQ. 'Y')  THEN 

SAVEFL='Y' 

WRITEd, 300) 'Enter  file  name:' 

READ(1,300)  BDFLNM 

OPEN(BDFILE,FILE-BDFLNM) 
ENDIF 
C 
C     If  options  are  chosen,  ask  user  for  additional  information 

DO  30  I=1,0PTNUM 
WRITE(1,300)  BLANK 
IF(OPTION(I).EQ.'l')  THEN 

WRITE( 1,300)  'Specify  a  depth  range  -' 

WRITE(1,300)  '  Enter  the  largest  well  depth  desired:' 

READ(1,200)  DEEP 

WRITEd, 300)  '  Enter  the  smallest  well  depth  desired:' 

READ( 1,200)  SHALL 
ELSE  IF(0PTI0N(I).EQ.'2')  THEN 

WRITEd, 300)  'Specify  a  date  range  -' 

WRITE(1,300)  '  Enter  largest  year  (last  2  digits  only):' 

READ(1,300)  HLDATE(3:4) 

WRITE(1,300)  '  Enter  smallest  year  (last  2  digits  only):' 

READ(1,300)  HLDATE(1:2) 
ELSE  IF(0PTI0N(I).EQ.'3')  THEN 

WRITEd, 300)  'Specify  particular  Year(s)  -' 
40     CONTINUE 

NUMYR=NUMYR+1 

YINDEX=(NUMYR*2)-1 

WRITEd, 300)  '  Enter  a  desired  year  (last  2  digits  only):' 

READ( 1,300)  YEAR(YINDEX:(YINDEX+1)) 

WRITEd, 300)  'Are  more  years  desired  (Y/N)?' 

READ(1,300)  ANSWER 

IF(ANSWER.EQ.'Y')  GOTO  40 
ELSE  IF(0PTI0N(I).EQ.'4')  THEN 

WRITE(1,300)  'Specify  particular  Year(s)  and  Month(s)  -' 
50     CONTINUE 

NUMYR=NUMYR+1 

YINDEX=(NUMYR*2)-1 

WRITEd, 300)    '      Enter  a  desired  year   (last  2  digits   only):' 

READ(1,300)   YEARM0(YINDEX:(YINDEX+1)) 

MON-0 
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60     CONTINUE 
M0N=M0N+1 
TM0N=TM0N+1 
MINDEX=(TM0N*2)-1 

WRITE(1,301)  '  Enter  one  desired  month  for  the  year  19', 
+  YEARM0(YINDEX:(YINDEX+1)) 

WRITE(1,300)  '   (2  DIGITS  -  leading  0  is  often  required):' 
READ( 1,300)  M0NTHS(MINDEX:(MINDEX+1)) 

WRITE(1,300)  'Are  there  more  months  for  this  year   (Y/N)?' 
READ(1,300)  ANSWER 
IF(ANSWER.EQ.'Y')  GO^O  60 
NUMMON(NUMYR)=MON 

WRITE(1,300)  'Do  you  wish  to  enter  another  year  (Y/N)?' 
READ( 1,300)  ANSWER 
IF(ANSWER.Eq.'Y')  GOTO  50 
ENDIF 
30  CONTINUE 
C 

C    Go  to  appropriate  subroutine  where  header/well  locations  will  be 
C     selected/entered,  and  sent  to  SEARCH. 
IF(TYPE.EQ.'l')  CALL  INTERACT 
IF(TYPE.EQ.'2')  CALL  LOCFILE 
IF(TYPE.EQ.'3')  CALL  TRSEARCH 
IF(TYPE.EQ.'4')  CALL  ALLSEARCH 
C 

ENDFILE  (OFILE) 
CLOSE  (INFILE) 
CLOSE  (OFILE) 
C 

WRITEd, 300) 'Would  you  like  to  continue  recovering  data  (Y/N)?' 
READ(1,300)  ANSWER 
IF(ANSWER.EQ.'Y')  GOTO  10 
200  F0RMAT(I4) 

300  FORMAT(A) 

301  F0RMAT(2A) 

STOP 

END 
r****  ppifj  ivi/\jf\j  oroaram  *********************************************************** 

C 

C 

C 

p •••*•••**•*•••***********•*••**••*•**••**••••*•••**•**** **•**•*•* 

SUBROUTINE  SEARCH 
r **•***••*•*••*•*•***•••***•**•***** ******************************* 

COMMON  /OFILES/  OFILE, BDFILE 

COMMON  /INFILS/  INFILE 

COMMON  /FLAGS/  PASSFL  ,SAVEFL ,SEPFLG,SORTFL 

COMMON  /INTG/  DEEP, NUMMON( 15) ,NUMYR, SHALL 

COMMON  /HDRS/  HEADER 

COMMON  /CHRS/  HLDATE .MONTHS, YEAR, YEARMO 
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C    Global  variables 

CHARACTER  HEADER*80,HLDATE*4,M0NTHS*120,SEPFLG*1, YEAR*30, 
+  YEARM0*30 

CHARACTER  PASSFL*! ,SAVEFL*1 ,S0RTFL*1 

INTEGER  BDFILE, DEEP, SHALL, INFILE,NUMMON,NUMYR,OFILE 
C    Local  variables 

CHARACTER  FILNAM*12,LINE*80,DATRNG*1 ,DEPRNG*1 ,PASS*1 ,SPYEAR*1 , 
+  SPYM0N*1,FLAG*1 

INTEGER  DEPTH, FILNUM,MINDEX, WRITES, YINDEX 
C 
C     Initialize  variables 

DATRNG='Y' 

DEPRNG='Y' 

SPYEAR='Y' 

SPYMON='y' 

PASSFL='P' 

FILNAM(1:1)='L' 

FILNUM=33 
C 
C    Determine  needs 

IF(DEEP.EQ.O)  DEPRNG='N' 

IF(HLDATE.EQ.'    ')  DATRNG='N' 

IF(YEAR(1:2).EQ.'   ')  SPYEAR='N' 

IF(YEARM0(1:2).EQ.'   ')SPYMON='N' 
C 

C     First  check  to  see  if  header  meets  specs  -  if  yes,  write  it  out  -  if  no, 
C    advance  to  the  last  line  of  record  and  RETURN 

IF(DEPRNG.EQ.'Y')  THEN 
READ(HEADER,200)  DEPTH 

IF((DEPTH.LT. SHALL). OR. (DEPTH. GT. DEEP))  GOTO  90 
ENDIF 
IF(DATRNG.EQ.'Y')  THEN 

IF(HEADER(44:45).EQ.'   ')  THEN 

IF(HEADER(42:43).GT.HLDATE(1:2))  GOTO  90 
ELSE  IF((HEADER(42:43).GT.HLDATE(1:2)).0R. 
+  (HEADER(44:45).LT.HLDATE(3:4)))  THEN 

GOTO  90 
ENDIF 
ENDIF 
C 
C     If  this  point  is  reached,  the  header  meets  specs,  so  write  out  to  file 

WRITE(0FILE,300)  HEADER 
C 

C    Search  for  and  write  out  data  that  meets  specs 
WRITES^O 
10  READ(INFILE,300)  LINE 
PASS='N' 
TMON-0 

IF(SPYEAR.EQ.'Y')  THEN 
DO  20  I-1,NUMYR 
YINDEX=(I*2)-1 
IF(LINE(1:2).EQ.YEAR(YINDEX:(YINDEX+1)))  GOTO  50 
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20   CONTINUE 

ELSE  IF(SPYMON.EQ. 'Y')  THEN 
DO  30  I-1,NUMYR 
YINDEX=(I*2)-1 

IF(LINE(1:2).EQ.YEARM0(YINDEX:(YINDEX+1)))  THEN 
DO  40  L=1,NUMM0N(I) 
TM0N=TM0N+1 
MINDEX=(TM0N*2)-1 

IF(LINE(3:4).EQ.M0NTHS(MINDEX:(MINDEX+1)))  GOTO  50 
40      CONTINUE 
ELSE 

TMON=TMON+NUMMON(I) 
ENDIF 
30   CONTINUE 
ELSE 

PASS='Y' 
ENDIF 
C 

GOTO  60 
50  PASS='Y' 
C     If  the  line  of  data  passed  inspection,  write  it  out,  and  note  that  data 
C    was  written  to  the  output  file.  If  no  data  was  written  for  a  given 
C     header  (WRITES=0),  the  header,  which  was  already  written  to  the  output 
C    file,  must  be  erased  (or  written-over) . 
60  IF(PASS.EQ.'Y')  THEN 
WRITES=WRITES+1 

I F(( WRITES. EQ.l). AND. (SEPFLG.EQ. 'Y'))  THEN 
FILNAM(2:12)-HEADER(6:16) 
OPEN(FILNUM,FILE=FILNAM) 
WRITE(FILNUM,300)  HEADER 
ENDIF 

IF(SEPFLG.EQ.'Y')  WRITE( FILNUM,300)  LINE 
WRITE(0FILE,300)  LINE 
ENDIF 
C 
C    Check  for  end  of  record 

IF(LINE(38:38).EQ.'l')  GOTO  80 
GOTO  10 
C 

C    Check  to  see  if  any  data  was  written  out  -  if  not,  set  it  up  so  that  the 
C     header  will  be  overwritten.  If  data  was  written  out,  set  the  flag  on  the 
C     last  entry  to  "1",  indicating  the  final  line  of  data  for  the  preceeding 
C    header. 
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80  IF(WRITES.EQ.O)  THEN 
BACKSPACE  OFILE 
PASSFL='F' 
ELSE 

BACKSPACE  OFILE 
READ(0FILE,300)  LINE 
LINE(38:38)='l' 
BACKSPACE  OFILE 
WRITE(0FILE,300)  LINE 
IF(SEPFLG.EQ.'Y')  CLOSE  (FILNUM) 
ENDIF 
GOTO  99 
C 

C     If  header  failed,  read  up  to  next  header,  and  RETURN 
90  READ(INFILE,250)  FLAG 
IF(FLAG.NE. '1')  GOTO  90 
PASSFL-'F' 
C 

200  F0RMAT(36X,I4) 
250  F0RMAT(37X,A1) 
300  FORMAT(A) 
99  RETURN 
END 
C 
C 

SUBROUTINE  HDRSEARCH  (LOCATN) 
Q ******************** *****••*•**•*•**•****•***•***•******• 

COMMON  /HDRS/  HEADER 

COMMON  /INFILS/  INFILE 

COMMON  /FLAGS/  PASSFL  .SAVEFL ,SEPFLG,SORTFL 
C    Global  variables 

CHARACTER  HEADER*80,PASSFL*1 ,SAVEFL*1 ,SEPFLG*1,S0RTFL*1 

INTEGER  INFILE 
C     Local  variables 

CHARACTER  LOCATN*! 1 ,LINE*80,FLAG*1 


C 


IF{S0RTFL.EQ.'N')  REWIND  INFILE 
PASSFL='P' 

10  READ(INFILE,300,END=80)  LINE 
IF(LINE(6:16).EQ. LOCATN)  THEN 
HEADER=LINE 
GOTO  99 
ELSE 
20   READ(INFILE,200)  FLAG 
IF(FLAG.NE.'l')  GOTO  20 
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ENDIF 
GOTO  10 
C 

80  PASSFL='F' 
REWIND  INFILE 
C 

200  F0RMAT(37X,A1) 
300  FORMAT(A) 
99  RETURN 
END 
C 

C 

r **•**•***••****•*******•**•********••****** •***•**•*****•**••***• 

SUBROUTINE  INTERACT 

COMMON  /OFILES/  OFILE.BDFILE 
COMMON  /FLAGS/  PASSFL ,SAVEFL,SEPFLG,SORTFL 
COMMON  /HDRS/  HEADER 
C    Global  variables 

CHARACTER  HEADER*80, PASSFL*!, SAVEFL*! ,SEPFLG*1,S0RTFL*1 
INTEGER  BDFILE,0FILE 
C    Local  variables 

CHARACTER*11  LOCATN(IOO) 
CHARACTER  BLANK*! 
INTEGER  NUMBER 
C 

BLANK='  ' 

WRITE(!,300)  BLANK 

WRITE(!, 300) 'WELL  LOCATION  entry  section:' 
WRITE(!,300)  BLANK 

WRITE(!,300) '  How  many  well  locations  would  you  like' 
WRITE(1,300)'  to  enter  (max  100)?' 
READ(1,200)  NUMBER 
WRITE(1,300)  BLANK 
DO  10  1  =  1, NUMBER 
WRITE( 1,250) '  Enter  the  11  digit  location  for  well  number', I 
READ( 1,300)  LOCATN(I) 
10  CONTINUE 
C    Send  each  location  to  SEARCH,  one  at  a  time 
DO  20  1=1, NUMBER 

CALL  HDRSEARCH  (LOCATN(I)) 
IF(PASSFL.EQ.'F')  THEN 

IF(SAVEFL.EQ.'Y')  WRITE(BDFILE,300)  LOCATN(I) 
ELSE 

CALL  SEARCH 
IF(PASSFL.EQ.'F')  THEN 

IF(SAVEFL.EQ. 'Y')  WRITE(BDFILE,300)  LOCATN(I) 
ENDIF 
ENDIF 
20  CONTINUE 
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200  F0RMAT(I3) 
250  F0RMAT(A,I4) 
300  FORMAT(A) 
RETURN 
END 
C 

c 

(^  ****••*•*•*•*•****•*•••****••••*••**•••***••**•********•**•****** *********** 

SUBROUTINE  LOCFILE 

Q******** ***************************************************** ***************** 

COMMON  /OFILES/  OFILE.BDFILE 
COMMON  /FLAGS/  PASSFL ,SAVEFL ,SEPFLG,SORTFL 
COMMON  /HDRS/  HEADER 
C    Global  variables 

CHARACTER  HEADER*80, PASSFL*! ,SAVEFL*1,SEPFLG*1,S0RTFL*1 
INTEGER  BDFILE.OFILE 
C    Local  variables 

CHARACTER  BLANK*!, FILNAM*32,L0CATN*11 
INTEGER  FILNUM 
C 

C    Initialize  variables 
FILNUM=6 
BLANK='  ' 
C 

WRITE(1,300)  BLANK 

WRITE( 1,300) 'Locations  will  be  read  from  an  external  file  -' 
WRITE(!,300)'  Enter  the  file  name:' 
READ(1,300)  FILNAM 
OPEN(FILNUM,FILE=FILNAM) 
C 

10  READ(FILNUM,300,END=99)  LOCATN 
CALL  HDRSEARCH  (LOCATN) 
IF(PASSFL.EQ.'F')  THEN 

IF(SAVEFL.EQ.'Y')  WRITE(BDFILE,300)  LOCATN 
ELSE 

CALL  SEARCH 
IF(PASSFL.EQ.'F')  THEN 

IF(SAVEFL.EQ.'Y')  WRITE(BDFILE,300)  LOCATN 
ENDIF 
ENDIF 
GOTO  10 
C 

99  CLOSE  (FILNUM) 
300  FORMAT(A) 
RETURN 
END 
C 
C 
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r ********************************************************************** ******** 

SUBROUTINE  TRSEARCH 
f ****************************************************************************** 

COMMON  /INFILS/  INFILE 

COMMON  /OFILES/  OFILE,BDFILE 

COMMON  /FLAGS/  PASSFL  ,SAVEFL ,SEPFLG,SORTFL 

COMMON  /HDRS/  HEADER 
C     Global  variables 

CHARACTER  HEADER*80, PASSFL*!, SAVEFL*! ,SEPFLG*1 ,S0RTFL*1 

INTEGER  BDFILE,OFILE 
C    Local  variables 

CHARACTER  BLANK*! ,FLAG*1 

CHARACTER*3  RNG(50) ,TWN(50) 

INTEGER  NUMTR 


BLANK='  ' 

WRITE(!,300)  BLANK 

WRITE(!,300)  'Township/Range  search  -' 

WRITE(!,300) '  Enter  the  number  of  Township/Range  pairs: 

READ(!,200)  NUMTR 

WRITE(!,300)  BLANK 

DO  10  1=!, NUMTR 

WRITE( 1,250) 'Enter  the  Township  for  pair  number', I 
WRITE(1,300)'(2  digits,  1  letter  -ex:  !6S)' 
READ(1,300)  TWN(I) 

WRITE(!, 250) 'Enter  the  Range  for  pair  number',! 
WRITE{!,300)'(2  digits,  1  letter  -ex:  !4E)' 
READ(!,300)  RNG(I) 
WRITE(1,300)  BLANK 
!0  CONTINUE 

20  READ{INFILE,300,END=150)  HEADER 
DO  30  1=1, NUMTR 

IF(HEADER(6:8).EQ.TWN(I))  THEN 

IF(HEADER(9:!!).EQ.RNG(I))  GOTO  100 
ENDIF 
30  CONTINUE 
GOTO  80 

80  READ(INFILE,2!0)  FLAG 
IF(FLAG.NE.'l')  GOTO  80 
GOTO  20 

100  CALL  SEARCH 

IF(PASSFL.EQ.'F')   THEN 

IF(SAVEFL.EQ.'Y')   WRITE(BDFILE,300)   HEADER 
ENDIF 
GOTO   20 
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c 

200  F0RMAT(I2) 

210  F0RMAT(37X,A1) 

250  F0RMAT(A,I4) 

300  FORMAT(A) 

150  RETURN 
END 
C 
C 

SUBROUTINE  ALLSEARCH 

COMMON  /INFILS/  INFILE 
COMMON  /OFILES/  OFILE,BDFILE 
COMMON  /FLAGS/  PASSFL  ,SAVEFL,SEPFLG,SORTFL 
COMMON  /HDRS/  HEADER 
C    Global  variables 

CHARACTER  HEADER*80, PASSFL*! ,SAVEFL*1,SEPFLG*1 ,S0RTFL*1 
INTEGER  BDFILE.OFILE 


C 


10  READ(INFILE,300,END=99)  HEADER 
CALL  SEARCH 
IF(PASSFL.EQ.'F')  THEN 

IF(SAVEFL.EQ.'Y')  WRITE(BDFILE,300)  HEADER 
ENDIF 
GOTO  10 

300  FORMAT(A) 
99  RETURN 
END 
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PROGRAM   STRIP_HEADERS 
C  S.P.PHILLIPS  2/85  This   program  creates  a   file  of  headers   given  well 

C  data   in   "standard"   USBR  format. 

C 

C  INPUT: 

C  Example   Input   (in   "standard"   USBR  format): 

C 

C  Q005M13S13E13D0110  6  N0016  83  0 

C  830706   020400203000700006001970    0 

C  840702   020400203000620005201978    0 

C  850708   020400203000650005501975    1 

C 

C    OUTPUT: 

C    Example  Output  (given  example  input): 

C 

C        Q005M13S13E13D0110  6  N0016  83  0 

C 

C****  Begin  program  **** 

CHARACTER  HEADER*48, IC*1 , INFILE*32,0FILE*32 

C 

WRITE(l,300)'Enter  INPUT  file  name  (max  32  char):' 

READ(1,300)  INFILE 

WRITEd, 300) 'Enter  OUTPUT  file  name  (max  32  char):' 

READ(1,300)  OFILE 

0PEN(30,FILE-INFILE) 

0PEN(40,FILE=0FILE) 

C 

10  READ(30,300,END=99)  HEADER 

WRITE(40,300)  HEADER 
20  READ(30,'(37X,A1)')  IC 
IF(IC.EQ.'O')  GOTO  20 
GOTO  10 
C 

300  FORMAT(A) 
99  STOP 
END 
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PROGRAM   DEPTH    SORT 
C  S.P.PHILLIPS  7/86"7his   program  collects  well    data  within  a 

C  specified  depth   range  given   "standard"   USBR  format. 

C 

C  INPUT: 

C 

C  Example  Input  (in  "standard"  USBR  format): 
C 

C        Q005M13S13E13D0110  6  N0016  83  0 

C  830706  020400203000700006001970  0 
C  840702  020400203000620005201978  0 
C  850708  020400203000650005501975  1 
C 

C     OUTPUT: 

C        -  Format  is  identical  to  input 
C 
C****  Begin  program  **** 

CHARACTER  HEADER*46,DATA*38, INFILE*32,0FILE*32 
INTEGER  DEPTH, MINDEP,MAXDEP 
C 

C     Interactively  determine  user  needs 
WRITE(1,310) 

WRITE(1, 300) 'Enter  name  of  INPUT  file:' 
READ(1,300)  INFILE 
0PEN(30,FILE-INFILE) 

WRITEd, 300) 'Enter  name  of  OUTPUT  file:' 
READ(1,300)  OFILE 
0PEN(40,FILE=0FILE) 

WRITE( 1,300) 'Enter  minimum  depth  (integer):' 
READ(1,200)  MINDER 

WRITEd, 300) 'Enter  maximum  depth  (integer):' 
READ( 1,200)  MAXDEP 
C 

10  CONTINUE 

READ(30,300,END=99)  HEADER 
READ(HEADER,210)  DEPTH 

IF  ((DEPTH. GE. MINDER). AND. (DEPTH. LE. MAXDEP))  THEN 
WRITE(40,300)  HEADER 
20   CONTINUE 

READ(30,300)  DATA 
WRITE(40,300)  DATA 
IF  (DATA(38:).NE.'r)  GOTO  20 
ELSE 
30   CONTINUE 

READ(30,300)  DATA 
IF  (DATA(38:).NE.'l')  GOTO  30 
ENDIF 
GOTO  10 
200  F0RMAT(I3) 
210  F0RMAT(37X,I3) 
300  FORMAT(A) 
310  FORMAT(  ) 
99  STOP 
END 
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PROGRAM   STRIP   LOG 

C  S.P.PHILLIPS  05/87  This   program  reads   in  a   list  of  "standard"   USER 

C  headers,   and  returns   only  the   location   in  the  proper  format  for  the  file 

C  to  be  read  by  DATA_RECOVERY   (for  list-driven   search). 
C 

C  INPUT: 

C  Example  of  header   in   "standard"   USBR  format: 

C 

C        Q005M13S13E13D0110  6  N0016  83  0 

C 

C     OUTPUT: 

C     Example  output  (given  example  input): 

C 

C        13S13E13D01 

C 

C****  Begin  program  **** 

CHARACTER  INFILE*32,L0C*11 ,0FILE*32 

C 

WRITE(l,300)'Enter  INPUT  file  name  (max  32  char):' 
READ(1,300)  INFILE 

WRITEd, 300) 'Enter  OUTPUT  file  name  (max  32  char):' 
READ(1,300)  OFILE 
0PEN(30,FILE=INFILE) 
0PEN(40,FILE=0FILE) 
C 

1=0 
10  CONTINUE 

READ(30,'(5X,A11)',END=99)  LOG 
1  =  1  +  1 

WRITE(40,300)  LOC 
GOTO  10 
C 

99  WRITEd, 200)  I 
200  F0RMAT(//, 'Total  number  of  wells  is: ',15) 
300  FORMAT(A) 
STOP 
END 
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PROGRAM   DATESELECT 
C  S.P.PHILLIPS   12/85  This   program  accepts  well   data   in    'standard'    USBR 

C  format,   and  outputs   the   location,   water   level,   and  depth  for  those  wells 

C  with  a  water   level   measurement  on   the  user-specified  date. 

C 

C  INPUT: 

C  Example  Input  (in  "standard"  USBR  format): 
C 

C        Q005M13S13E13D0110  6  N0016  83  0 

C  830706  020406203000700006001970  0 
C  840702  020400203000620005201978  0 
C  850708  020400203000650005501975  1 
C 

C    OUTPUT: 

C    Example  Output  given  the  example  input,  and  specifying  the  date  7/84: 
C 

C        Q005M13S13E13D01     197.8     0016 
C 
C****  Begin  MAIN  program  **** 

CHARACTER  ANSWER*1 ,DECIMAL*1,HEADER*80, INFILE*32,LINE*38, 
+         M0NTH*2,0FILE*32,YEAR*2 
C 

DECIMAL='.' 
C 
C    User  entry  section  (interactive) 

WRITEd, 300) 'Enter  INPUT  file  name  (max  32  chars):' 

READ(1,300)  INFILE 

WRITEd, 300) 'Enter  OUTPUT  file  name  (max  32  chrs):' 

READ(1,300)  OFILE 

0PEN(30,FILE=INFILE) 

0PEN(40,FILE=0FILE) 

WRITE(1, 300) 'This  program  selects  data  given  a  specific  date:' 

WRITE(1, 300) 'Would  you  like  to  include  the  MONTH  (Y/N)?' 

READ(1,300)  ANSWER 

IF(ANSWER.EQ.'N')  GOTO  5 

WRITE(1,300)'    Enter  the  MONTH  (2  digits):' 

READ(1,300)  MONTH 

WRITE(1,300)'    Enter  the  YEAR  (2  digits):' 

READ(1,300)  YEAR 

GOTO  10 
5  WRITEd, 300)'    Enter  the  YEAR  (2  digits):' 

READ( 1,300)  YEAR 

GOTO  30 
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C    This  procedure  is  used  if  a  particular  month  is  specified 
10  READ(30,300,END=99)  HEADER 

I0UT=1 
20  READ(30,300)  LINE 

IF((LINE(1:2).EQ.YEAR).AND.(LINE(3:4).EQ.M0NTH))  THEN 
IF(IOUT.EQ.l)  WRITE(40,250) 
+  HEADER(1:16),LINE(30:32), DECIMAL, LINE(33:34),  HEADER(37:40) 
I0UT=2 
ENDIF 

IF(LINE(38:).NE.'l')  GOTO  20 
GOTO  10 
C 

C    This  procedure  is  used  when  only  the  year  is  specified 
30  READ(30,300,END=99)  HEADER 
40  READ(30,300)  LINE 

IF(LINE(1:2).EQ.YEAR)  WRITE(40,250) 
+  HEADERd:  16), LINE(  30: 32), DECIMAL, LINE(33:34) 
IF(LINE(38:).NE.'l')  GOTO  40 
GOTO  30 
C 

250  FORMAT( A16 , 5X , A3 ,A1 ,A2 , 5X ,A4 ) 
300  FORMAT(A) 
99  STOP 
END 
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PROGRAM  WL  DIFF 

C    S.P.PHILLIPS  CI2/87  This  program  reads  two  files  in  the  format 

C    of  the  output  from  DATE_SELECT,  and  produces  a  file  containing 

C    the  locations  common  to  both,  and  the  difference  between  the 

C    water  levels. 

C 

C     INPUT: 

C    Example  of  input  file  1: 

C 

C     Q005M13S13E13D01     197.0     0016 

C 

C    Example  of  input  file  2: 

C 

C     Q005M13S13E13D01     197.5     0016 

C 

C     OUTPUT: 

C 

C     Q005M13S13E13D01      -0.5       16 

C 

C****  Begin  program  **** 

CHARACTER  L0C_1*16,L0C_2*16, INFIL1*32, INFIL2*32,0FILE*32 
INTEGER  DEPTH1,DEPTH2 
C 

WRITE(1,310) 

WRITE(1, 300) 'Enter  name  of  Input  file  1:' 
READ(1,300)  INFILl 
0PEN(30,FILE=INFIL1) 

WRITE(1, 300) 'Enter  name  of  Input  file  2:' 
READ(1,300)  INFIL2 
0PEN(31,FILE=INFIL2) 

WRITE(1, 300) 'Enter  name  of  Output  file:' 
READ(1,300)  OFILE 
0PEN(40,FILE=0FILE) 
C 

READ(30,200)  L0C_1 ,WSELEV1,DEPTH1 
READ(31,200)  L0C_2,WSELEV2,DEPTH2 
10  CONTINUE 
C    Check  to  see  if  locations  are  ,  ,  or  =  to  each  other,  and 
C    deal  with  each  case  separately. 

IF(LOC  1(6:16). GT.L0C_2(6:16))  THEN 

READT31,200,END=99)  L0C_2,WSELEV2,DEPTH2 
ELSE  IF(L0C_1(6:16).LT.L0C_2(6:16))  THEN 

READ(30,200,END=99)  L0C_1,WSELEV1,DEPTH1 
ELSE 

DIFF=WSELEV1-WSELEV2 
WRITE(40,200)  L0C_1,DIFF,DEPTH1 
READ(30,200,END=99)  L0C_1 ,WSELEV1 ,DEPTH1 
READ(31,200,END=99)  LOC  2,WSELEV2,DEPTH2 
ENDIF 
GOTO  10 
200  F0RMAT(A16,5X,F5.1,5X,I5) 
300  FORMAT(A) 
310  format!  ) 
99  STOP 
END 
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